x <- data$variable_xaxis y <- data$variable_yaxis plot(x, y, main = "Main title", xlab = "X axis title", ylab = "Y axis title", pch = 19, frame = FALSE) abline(lm(y ~ x, data = mtcars), col = "blue")
x <- data$variable_xaxis y <- data$variable_yaxis plot(x, y, main = "Main title", xlab = "X axis title", ylab = "Y axis title", pch = 19, frame = FALSE) abline(lm(y ~ x, data = mtcars), col = "blue")