Графики ggplot не видны в R Shiny Dashboard - PullRequest
Новая
       11

Графики ggplot не видны в R Shiny Dashboard

0 голосов
/ 19 декабря 2018 
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 отображает график, а второй оператор if, использующий график ggplot, ничего не отображает на панели инструментов.Любая идея, как я могу отображать графики ggplot в подобных ситуациях.

Примечание. Я уже пытался сохранить график в переменной, но он все еще не отображается на панели инструментов.

1 Ответ

0 голосов
/ 19 декабря 2018

Пожалуйста, не могли бы вы представить репрезентативный воспроизводимый пример с элементом пользовательского интерфейса, чтобы мы могли дополнительно оценить, что нужно изменить

...