Comparing the times on plyr vs base and the nycflights 13 package to find the mean carrier departure delay

library(nycflights13)
## Warning: package 'nycflights13' was built under R version 3.1.2
system.time(with(flights, tapply(dep_delay, carrier, summary)))
##    user  system elapsed 
##    0.37    0.03    0.41
library(plyr)
system.time(dlply(flights, .(carrier), function(x) summary(x$dep_delay)))
##    user  system elapsed 
##    0.08    0.03    0.10