Plotting Examples of code

JayEnAar

Understanding R Syntax

Aplogies for copying code from others without explicit acknowledgement. I am doing this to aid my understanding of R syntax.

    1. Plotting from manually entered data. Uses Base plotting ststem
total <- c(17149, 17410, 17316, 18501, 19298)
plot(total, 
     main = "World's total electricity consumption", 
     type = "b", pch = 15, 
     xaxt = "n", 
     xlab = "Years", 
     ylab = "energy consumption, in billion Kwh" )
axis(1, at = 1:5, labels = c("2007", "2008", "2009", "2010", "2011"))

plot of chunk unnamed-chunk-1

    1. Sine and cosine curves from R help on matplot
x <- seq(-4, 4, len = 101)
y <- cbind(sin(x), cos(x))
matplot(x, y, type = "l", xaxt = "n",
        main = expression(paste(plain(sin) * phi, "  and  ",
                                plain(cos) * phi)),
        ylab = expression("sin" * phi, "cos" * phi), # only 1st is taken
        xlab = expression(paste("Phase Angle ", phi)),
        col.main = "blue")
axis(1, at = c(-pi, -pi/2, 0, pi/2, pi),
     labels = expression(-pi, -pi/2, 0, pi/2, pi))
abline(h = 0, v = pi/2 * c(-1,1), lty = 2, lwd = .1, col = "gray70")

plot of chunk unnamed-chunk-2

str(cars)
## 'data.frame':    50 obs. of  2 variables:
##  $ speed: num  4 4 7 7 8 9 10 10 10 11 ...
##  $ dist : num  2 10 4 22 16 10 18 26 34 17 ...
summary(cars)
##      speed           dist    
##  Min.   : 4.0   Min.   :  2  
##  1st Qu.:12.0   1st Qu.: 26  
##  Median :15.0   Median : 36  
##  Mean   :15.4   Mean   : 43  
##  3rd Qu.:19.0   3rd Qu.: 56  
##  Max.   :25.0   Max.   :120
plot(cars)

plot of chunk unnamed-chunk-4