opt <- options(actions.verbose=2)
# define actions
postponeAction(function(){print(10)}, "print")
postponeAction(function(){print(1:10)}, "more")
postponeAction()
# execute actions
runPostponedAction()
runPostponedAction()
# restore options
options(opt)
Run the code above in your browser using DataLab