# NOT RUN {
## Calculate the sum of all even numbers to 100
Sum(for (i in seq(2, 100, 2)) i)
## Find the mean
Mean(for (i in 1:10) log(i))
## Combine character values
greet <- c("Hello", "World", "Nice", "To", "Meet", "You")
val <- Paste(for (i.j in enum(greet)) paste0(i, ": ", j), collapse="\n")
cat(val)
# }
Run the code above in your browser using DataLab