png("Web/simplebase-plottypes.png", width=480, height=480) par(mfrow=c(2, 2), cex=0.6, mar=c(4, 4, 1, 1)) y <- rnorm(20) plot(y, type="p") plot(y, type="l") plot(y, type="b") plot(y, type="h") dev.off()