幻灯片没有像 R markdown 中的文档那样分开并显示在同一页面中

Question

我正在尝试学习 R markdown。 所以，我打开了默认的 R markdown 幻灯片演示文档。然后我将部分更改为Slide with R Output。当我编织我创建的代码时，幻灯片没有分开，而是显示为单个document。当我删除代码时，幻灯片会按照我想要的方式分开。

代码如下：

带 R 输出的幻灯片

```{r Moisture}
library(highcharter)
library(tidyverse)

Moisture_kurokawa <- read_csv("raw.csv") %>%
  na.omit() %>%
  mutate(timestamp = lubridate::mdy_hms(sprintf("%s %s", Date, Time)))

hc <- highchart(type="stock")
for (k in names(Moisture_kurokawa)[3:7]) {
  hc <- hc_add_series_times_values(hc=hc, dates=Moisture_kurokawa$timestamp, 
                               values=pull(Moisture_kurokawa, k), name = k)
}
hc%>%hc_legend(enabled=TRUE)

```

我正在使用滑动演示。

非常感谢。

Answer 1

我测试了，现在似乎可以正常工作了（显然你必须设置数据的路径）：

---
title: "Untitled"
output: 
    ioslides_presentation:
        fig_width: 7
        fig_height: 6
        fig_caption: true
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE)
```

## R Markdown

This is an R Markdown presentation. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see <http://rmarkdown.rstudio.com>.

When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document.

## Slide with Bullets

- Bullet 1
- Bullet 2
- Bullet 3

## Slide with R Output {.flexbox .vcenter}

```{r message=FALSE}
library(highcharter)
library(tidyverse)
library(lubridate)

Moisture_kurokawa <- read_csv("./raw.csv") %>%
  na.omit() %>%
  mutate(timestamp = mdy_hms(sprintf("%s %s", Date, Time)))

hc <- highchart(type="stock")
for (k in names(Moisture_kurokawa)[3:7]) {
  hc <- hc_add_series_times_values(hc=hc, dates=Moisture_kurokawa$timestamp, 
                               values=pull(Moisture_kurokawa, k), name = k)
}
hc %>% 
    hc_legend(enabled=TRUE)

```