mean(c(2, 4, 6, 8))
## [1] 5