Удаление пустого уровня из данных в R Shiny - PullRequest
Новая
       11

Удаление пустого уровня из данных в R Shiny

0 голосов
/ 04 июня 2018

Мои данные, которые я импортировал, имеют 21 столбец, и в каждом столбце есть строки, записанные как «АНГЛИЙСКИЙ» ИЛИ «АРАБСКИЙ».на что мой geom_bar дает мне 3 бара вместо 2. Мне нужен график данных АНГЛИЙСКИЙ и ARABIC в моих столбцах, но он также показывает мне с третьим, который пуст "".Помоги мне с этим, пожалуйста.

            library(shiny)
            library(shinydashboard)
            library(ggplot2)
            library(dplyr)

    CatLang <- read.csv("C:/Users/Saqlain/Downloads/Careem/CatLang.csv",stringsAsFactors = TRUE)

        ui <- fluidPage(
              dashboardPage(
        dashboardBody(
                          fluidRow(
                          column(6,
                          plotOutput("LangHist1")       
                                 )
                          )
        )))

        server <- function(input, output) {

         output$LangHist1 <- renderPlot({
                    plotLang1<- ggplot(data.frame(CatLang$CAPTAIN.HYGIENE), aes(CatLang$CAPTAIN.HYGIENE)) + geom_bar()
                    plotLang1 + theme_light()
              }) 
     output$CountryHist1 <- renderPlot({
                plotCountry1 <-ggplot(data.frame(CatCountry$CAPTAIN.HYGIENE), aes(CatCountry$CAPTAIN.HYGIENE)) + geom_bar( width = 0.4, color = "black")
                plotCountry1 + theme_light()
          })
            }

shinyApp(ui = ui, server = server)

Как вы можете видеть в выводе, он показывает дополнительную полосу пустых данных.У меня нет пустых данных в моих данных, как мне преодолеть эту проблему?

...