Run »
values <- c(4,7,11,14) mean(values)
[1] 9