This is a test page. Here’s a bit of R code:

x <- rnorm(100)
y <- x*3 + rnorm(100)

Here’s a plot:

plot(x,y)