何时使用地图，何时使用申请？

Question

以下做同样的事情。何时使用地图，何时使用地图？

library(dplyr)
library(purrr)
mtcars %>% map(function(x) sum(x)^2)

或：

mtcars %>% apply(2,function(x) sum(x)^2)