apply_pb: apply with a progress bar

Description Usage Arguments Value Author(s) See Also Examples

View source: R/utils.r

Description

Can be used like standard base:::apply. The only thing it does is create an additional progress bar.

Usage

1
apply_pb(X, MARGIN, FUN, ...)

Arguments

X

see ?apply for parameter explanation

MARGIN

see ?apply

FUN

see ?apply

...

see ?apply

Value

see ?apply

Author(s)

Mark Heckmann

See Also

apply

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
## 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)

markheckmann/OpenRepGrid documentation built on April 30, 2021, 2:33 a.m.