SyntaxFix
Write A Post
Hire A Developer
Questions
Here is a lattice version:
library(lattice) eq<-function(x) {x*x} X<-1:1000 xyplot(eq(X)~X,type="l")