我在 markdown 中运行一些绘图代码以在 xaringan 演示文稿中生成绘图。该代码有效,但有点长,因此占用了整个演示幻灯片,迫使实际情节脱离边缘(见 img)。
如何隐藏生成绘图的代码块?
另外如何使用滚动条压缩代码块?
```{r}
r_exp.fun <- function(r = 0.05, N_pop = 10, t = 150)
{
N <- vector("numeric", length = t)
N[1] <- N_pop
for (i in 2:t)
{
N[i] <- N[i-1] + (N[i-1] * r)
}
return(N)
}
args_list <- list(0.045, 0.055, 0.06)
matplot(
mapply(
r_exp.fun,
r = args_list
)
,type = "l")
abline(h = list(7052, 29150, 59000))
```
另一种方法当然是另存为图像,但如果可能的话,我希望能够将代码保留为任何拥有链接的人的资源。
谢谢!