3939.sagews

x <- rnorm(100)
y <- rnorm(100, mean=5)*x+rnorm(100, mean=0.1)
#png()
plot(y ~ x)
abline(lm(y ~ x), lwd=2)
.silent.me. <- dev.off()

Error in X11(paste("png::", filename, sep = ""), width, height, pointsize, : unable to start device PNG In addition: Warning message: In png() : no png support in this version of R Error in X11(paste("png::", filename, sep = ""), width, height, pointsize, : unable to start device PNG In addition: Warning message: In png() : no png support in this version of R Error in dev.off() : cannot shut down device 1 (the null device)