x <- 1 y <- 2 sum (x + y)

x <- c(1:3)

y <- x

x <- seq(0, 10, length = 100) y <- 2 * x + 3 plot(x, y, type = “l”, col = “red”, xlab = “X-axis”, ylab = “Y-axis”, main = “Linear Plot (y = 2x + 3)” )