sapply and a for loop.

Goal

Print squares and a city loop.

print(sapply(c(12, 8, 5), function(n) n * n))

cities <- c("Nairobi", "Mombasa", "Kisumu")
for (city in cities) {
  print(city)
}

total <- 0
for (i in 1:5) {
  total <- total + i
}
print(total)

print(vapply(c(12, 8, 5), function(n) n * 40, numeric(1)))