Как выполнить упражнение в учебнике, не запуская приведенные выше коды в Rmarkdown? - PullRequest
0 голосов
/ 29 января 2019

Я пытаюсь написать учебник в Rmarkdown с блестящими приложениями.Это работает хорошо, пока я не добавил упражнение на странице.Когда я нажал кнопку «Выполнить код», он запустил все приведенные выше коды и выполнил их реальный результат вместо отображения, как на скриншотах.Кроме того, последний код, который я пишу в упражнении, отображается каждый раз, когда я просматриваю учебник.

У кого-нибудь есть эта проблема или решение?

https://www.flickr.com/photos/149687914@N08/46862084412/in/dateposted-public/

https://www.flickr.com/photos/149687914@N08/31973148497/in/dateposted-public/

Чанки под чанком упражнения являются нормальными, как показано ниже: https://www.flickr.com/photos/149687914@N08/31973612587/in/dateposted-public/

Когда я нажимаю «Выполнить код», он фактически запускает весь код выше на странице.

Полный код: https://codeshare.io/Gkx8Wx

1 Ответ

0 голосов
/ 29 января 2019

Это то, что я получаю из этого кода ниже.Кажется, это правильно рендеринг. Можете ли вы проверить это один раз?

---
title: "Hello, Tutorial!"
output: learnr::tutorial
runtime: shiny_prerendered
---

```{r}
library(rebmix)
library(learnr)
data("wine", package = "rebmix")
library(data.table)
wine <- as.data.table(wine)
str(wine)
```

### Exercise: Try for the wine Data

Subset rows where Cultivar value is 1, and then subset rows where Cultivar is 1
and Proline is greater than 1000. Then, subset the rows between 10 and 30.

```{r datatable, exercise=TRUE, exercise.eval=FALSE}

```


```{r datatable-solution}

wine1 <- wine[Cultivar == 1 & Proline > 1000]
wine2 <- wine[10:30]

```

```{r datatable-hint-1}

wine1 <- wine[Cultivar == 1, ...]

```
```{r datatable-hint-2}

wine1 <- wine[Cultivar == 1 & Proline > 1000]

```
```{r datatable-hint-3}

wine2 <- wine[10:?]

```

Это скриншот

enter image description here

...