Я думаю, вам просто нужно изменить параметры блока:
ch1 имеет echo = FALSE, поэтому код не отображается, только объект. ch2 имеет echo = TRUE и results = 'hide', поэтому результаты скрыты, но вывод показывает. То же самое с ch3 и ch4.
```{r ch1, echo = FALSE}
var <- seq(from = 1, to = 10, by = 2) %>%
details::details(
summary = "Output",
open = TRUE
)
var
```
Здесь вы показываете код:
```{r ch2, echo = TRUE, results = 'hide'}
seq(from = 1, to = 10, by = 2) %>%
details::details(
summary = "Output",
open = TRUE
)
```
Здесь вы строите график:
```{r ch3, echo = FALSE}
p <- details(
plot(x=mtcars$mpg,y=mtcars$wt),
summary = "Output",
imgur = FALSE,
open = TRUE
)
p
```
Здесь вы показываете код:
```{r ch4, results = 'hide'}
details(
plot(x=mtcars$mpg,y=mtcars$wt),
summary = "Output",
imgur = FALSE,
open = TRUE
)
```