nick34992 of R-lang
2/2/2017 - 7:23 AM

graph_01.R

#!/usr/bin/env R

x <- seq(-5, 5, 0.3)
y <- 2*x^2 + 5*x-8
plot(x, y, pch = 16, col = "red", xlim = c(-6, 6), ylim = c(-20, 70), main = expression(2*x^2 + 5*x - 8), xlab = "X" , ylab = "Y")
lines(x, y)
abline(h = 0)
abline(v = 0)