R: do not pause() demos if run non-interactively