在flexdashboard中显示代码

Question

我正在尝试使用R生成一个flexdashboard，并希望在我的演示文稿中显示代码，但这似乎不起作用。 这是一个小例子：

---
title: "Test"
output: 
  flexdashboard::flex_dashboard
---

```{r setup, include=FALSE}
library(flexdashboard)
```

### Code

```{r, eval=FALSE, include=TRUE}
plot(iris$Sepal.Length, iris$Sepal.Width)
```   

### Output

```{r, fig.align='center', echo = FALSE}
plot(iris$Sepal.Length, iris$Sepal.Width)
```

即使是fig.show = 'hide'之类的其他查克选项也无效。 是否可以在flexdashboard中的R-chuck中显示代码？ 代码亮点将是一个好处而不是纯文本。

Answer 1

如果您希望显示代码和绘图，请将块选项设置为：echo = true

如果您只想将代码设置为：echo=TRUE, eval=FALSE

---
title: "Test"
output: 
  flexdashboard::flex_dashboard
---

```{r setup, include=FALSE}
library(flexdashboard)
```

### Code

```{r, echo=TRUE, eval=FALSE}
plot(iris$Sepal.Length, iris$Sepal.Width)
```   

### Code and Plot

```{r, echo=TRUE}
plot(iris$Sepal.Length, iris$Sepal.Width)
``` 

### Plot

```{r, fig.align='center', echo = FALSE}
plot(iris$Sepal.Length, iris$Sepal.Width)
```

Answer 2

它不会在演示文稿中显示为面板，但要在信息中心中添加</> Source Code按钮，请在您的YAML中添加source_code: embed。

--- title: "Example" output: flexdashboard::flex_dashboard: source_code: embed ---