r + shiny + ggplot2 + flexdashboard - 无法绘制直方图

要在R中使用r + shiny + ggplot2 + flexdashboard绘制直方图，您可以遵循以下解决方案：

1. 确保已安装所需的R包：

install.packages("shiny")
install.packages("ggplot2")
install.packages("flexdashboard")

2. 创建一个flexdashboard文件（例如，名为dashboard.Rmd的文件），并添加以下代码：

---
title: "Dashboard"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    vertical_layout: scroll
---

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

Column {.sidebar}

Controls

sliderInput("bins", "Number of bins:", min = 1, max = 50, value = 30)

Column

Histogram

renderPlot({
  ggplot(mtcars, aes(x = mpg)) +
    geom_histogram(binwidth = input$bins) +
    theme_minimal()
})

3. 运行以下代码以启动shiny应用程序：

library(shiny)
runApp("dashboard.Rmd")

这将启动一个shiny应用程序，显示具有滑块输入的直方图。您可以使用滑块来更改直方图的bin数量。

请注意，flexdashboard是一个基于R Markdown的框架，它允许您创建交互式仪表板。在上述示例中，我们使用flexdashboard创建了一个包含控件和图表的仪表板，并使用shiny来使其可交互。ggplot2用于绘制直方图。通过调整bins的值，可以更改直方图的bin数量。