我想为演示教程准备一个演示(将按点击顺序播放)...有人可以帮助我如何编写演示,假设以下是演示中的步骤...
#start
set.seed(1345)
x1 <- sample(letters[1:10], 5)
x1
sort(x1)
x <- sample(1:10, 5)
y <- sample(c(11:20), 5)
require(lattice)
plot(x,y)
z <- rnorm(5, 1, 0.5)
dataframe <- data.frame(x, y, z)
model1 <- lm(y ~x)
aov(model1)
#end
抱歉,经过数小时和数天的搜索,我可以找到解决方案。我感谢您的帮助。
最佳答案
另一种方法:
demo.R
) pause()
战略要地pause <- function() invisible(readline())
source("demo.R", echo=TRUE)
运行脚本然后它将打印并运行您的命令并停止并等待洒水
pause()
处的输入。 .刚打<Enter>
接着说。编辑:我不知道隐藏
pause()
的好方法陈述。一种可能的方法是复制 source()
的代码并修改它以跳过对 pause()
的打印调用,但我认为这有点矫枉过正.........但您可以将暂停功能重命名为您喜欢的任何名称 - 包括
'....'
,但你仍然需要这样称呼它:....()
嗯。也许是这样的:
'....' <- function(...) invisible(readline())
然后将您的脚本洒上:
....('Press Enter to continue')
# Or
....(Press_Enter_to_continue)
如果您将暂停功能重命名为
Pausing...
的另一种可能性:Pausing...(Press_Enter)
关于r - 如何为演示教程创建演示?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/7439415/