Hello world

plot(rnorm(100), rnorm(100), col=sample(1:5,100,TRUE), pch=16, cex=2)