# NOT RUN {
str(Sunspot)
attach(Sunspot)
plot(year,sunspots,type="l",main="Yearly Sunspots") # Using standard plot
library(lattice)
xyplot(sunspots ~ 1700:2000, xlab = "", type = "l",main="Yearly Sunspots")
xyplot(sunspots ~ 1700:2000, xlab = "", type = "l", aspect="xy",
main="Yearly Sunspots")
detach(Sunspot)
# }
Run the code above in your browser using DataLab