Apply Functions in R | Finance Train