had*_*ley 11
为什么不使用内置的file.show?
more <- function(x) {
file <- tempfile()
sink(file); on.exit(sink())
print(x)
file.show(file, delete.file = T)
}
more(mtcars)
more(more)
Run Code Online (Sandbox Code Playgroud)
我不相信,但它应该很容易创建。只需查找用户输入并readline("\nType <Return> to go to the next page : ")递归循环访问该对象即可。