
apply_pb(X, MARGIN, FUN, ...)
apply
## Not run:
#
# apply_pb(anscombe, 2, sd, na.rm=TRUE)
#
# # larger dataset
# df <- data.frame(rnorm(30000), rnorm(30000))
# head(apply_pb(df, 1, sd))
#
# # performance comparison
# df <- data.frame(rnorm(90000), rnorm(90000))
# system.time(apply(df, 1, sd))
# system.time(apply_pb(df, 1, sd))
#
# ## End(Not run)
Run the code above in your browser using DataLab