Wraps fun in a function that runs fun and then issues a
readline prompt to prevent further R code evaluation until user
presses a key.
Usage
make_blocking(fun, msg = "Press ENTER to continue...", invisible.res = TRUE)
Arguments
- fun
a function
- msg
character(1L) a message to use as the readline prompt
- invisible.res
whether to return the result of fun invisibly
Value
fun, wrapped in a function that does the blocking.
Examples
make_blocking(sum, invisible.res=FALSE)(1:10)
#> [1] 55