This is an example of embedding code in the document.
# My First R Program
x <- seq(1,25,1) # setting x equal to 5
vol <- c(1,3,4,5,7)
ph <- c(2.2,2.4,3.0)
x
## [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
y <- x^2
y
## [1] 1 4 9 16 25 36 49 64 81 100 121 144 169 196 225 256 289 324 361
## [20] 400 441 484 529 576 625
plot(x,y,xlab="x symbol")