Как я могу остановить разбиение блоков кода на предварительный просмотр R Notebook?

Question

```{r scatterplots, collapse=TRUE, results= 'hold'}
p1 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p2 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p3 <- ggplot(x, aes(y=f.ecdf, x=G1))+geom_point()+theme_bw()
p4 <- ggplot(x, aes(y=f.ecdf, x=G2))+geom_point()+theme_bw()
p5 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p6 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p7 <- ggplot(x, aes(y=f.ecdf, x=G1))+geom_point()+theme_bw()
p8 <- ggplot(x, aes(y=f.ecdf, x=G2))+geom_point()+theme_bw()

grid.arrange(
  p1, p2, p3, p4,
  ncol = 2
)

 grid.arrange(
   p5, p6, p7, p8,
   ncol = 2
)
```

Но в предварительном просмотре фрагменты кода оцениваются после разделения.

Как я могу предотвратить это. По сути, я хочу, чтобы все графики были прерваны.

Какую другую информацию я могу предоставить, чтобы диагностировать это?

Answer 1

Похоже, что существует известная проблема, когда ноутбуки R игнорируют параметры чанков: https://github.com/rstudio/rmarkdown/issues/1077, поэтому не уверены, что есть простое решение для банкоматов.

Одно специальное исправление, возможно, не идеальное, но вы можете использовать фигурные скобки, например

---
title: "R Notebook"
output: 
  html_notebook
---

```{r scatterplots, collapse=TRUE, results= 'hold'}
library(ggplot2)
library(gridExtra)
set.seed(12345)
x <- data.frame(f.ecdf=rnorm(10), P2=rnorm(10), G1=rnorm(10), G2=rnorm(10))

p1 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p2 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p3 <- ggplot(x, aes(y=f.ecdf, x=G1))+geom_point()+theme_bw()
p4 <- ggplot(x, aes(y=f.ecdf, x=G2))+geom_point()+theme_bw()
p5 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p6 <- ggplot(x, aes(y=f.ecdf, x=P2))+geom_point()+theme_bw()
p7 <- ggplot(x, aes(y=f.ecdf, x=G1))+geom_point()+theme_bw()
p8 <- ggplot(x, aes(y=f.ecdf, x=G2))+geom_point()+theme_bw()

{grid.arrange(
  p1, p2, p3, p4,
  ncol = 2
)

grid.arrange(
  p5, p6, p7, p8,
  ncol = 2
)}