ggplot图形在R Shiny仪表板中不可见

时间:2018-12-19 14:51:53

标签: r ggplot2 shiny shinydashboard

server <- function(input, output) {


      output$plot1<-renderPlot({

        if(input$univariate=="Age")
        {

          hist(bankchurn$Age,xlab='Age',ylab='No of Customers',col= '#45b3e0' ,main="Age")


          output$text1<-renderText("hi")`enter code here`

        }

     if(input$univariate=="Gender")
        {
          ggplot(data = bankchurn) +
            aes(x = Gender, fill = Gender) +
            geom_bar() +
            scale_fill_viridis_d(option  = "plasma") +
            theme_minimal()
          output$text1<-renderText("Gender")


        }
  

在上面的代码中,我的第一个“ if”语句正在渲染图,但是我的第二个使用ggplot图的if语句在仪表盘中没有渲染任何内容。知道在这种情况下如何显示ggplot图。

注意:我已经尝试过将图形存储在变量中,但仍无法在仪表板上显示它。

1 个答案:

答案 0 :(得分:0)

请提供一个reprex-可复制的示例,其中包含一个UI元素,以便我们进一步评估需要更改的内容