Coded as follows:
x = seq(.001,50,.001) par(bg="black") par(mar=c(0,0,0,0)) plot(x,sin(1/x)*rpois(length(x),x),pch=20,col="blue")
Coded as follows:
x = seq(.001,50,.001) par(bg="black") par(mar=c(0,0,0,0)) plot(x,sin(1/x)*rpois(length(x),x),pch=20,col="blue")
This entry was posted on Friday, May 28th, 2010 at 5:00 pm and is filed under plot, r. You can follow any comments to this entry through the RSS 2.0 feed. You can leave a comment, or trackback from your own site.
© 2013.

awesome. what program generated this?