неверный аргумент envir типа «персонажа» в пакетах Shiny и Leaflet в R-программировании - PullRequest
Новая
       106

неверный аргумент envir типа «персонажа» в пакетах Shiny и Leaflet в R-программировании

0 голосов
/ 27 апреля 2020

Я пытаюсь создать интерактивную карту, используя Shiny и Leaflet, однако, я продолжаю получать ту же ошибку, и я не уверен, как ее исправить. 

data <- read.csv("C:/Users/Stcri/OneDrive/Documents/Los Angeles Auto Accidents Interactive/LA-Traffic.csv", strip.white = TRUE)

#Define UI ----
ui <- fluidPage(
  titlePanel("Interactive Los Angeles Traffic COllision"), 
  sidebarLayout(
    sidebarPanel(
      checkboxGroupInput("Gender", h3("Gender"), choices = list("F", "M"), selected = "Female")
    ),
    mainPanel(renderLeaflet("map", "100%", 500), 
              plotOutput("bar"))
  )
)

#Define Server logic ---- 
server <- function(input, output, session) {
  filtered <- reactive ({
    if (is.null(input$Gender)){
      return(NULL)
    }
    data %>% filter(VictimSex %in% input$Gender)
  })

  output$map <- renderLeaflet({
    leaflet()%>%
      addProviderTiles("CartoDB") %>%
      addCircleMarkers(data = filtered(), radius = 2)
  })
}

#Run the app ----
shinyApp(ui, server)

Я получаю ошибку: Недопустимый аргумент "envir" типа "символ" / ошибка в силе (UI)

...