Ввод объекта не найден при создании диаграммы солнечных лучей - PullRequest
Новая
       21

Ввод объекта не найден при создании диаграммы солнечных лучей

0 голосов
/ 30 сентября 2019

Я пытаюсь создать интерактивную диаграмму солнечных лучей, которая будет меняться в зависимости от изменений в годах, но я продолжаю получать эту ошибку.

Набор данных от здесь . Я преобразовал его так, чтобы его можно было прочитать в библиотеке Sunburst в формате, который выглядит как this

А вот мой код: 

library(dplyr)
library(shiny)
library(sunburstR)

# Load Data 


sun_tot <- read.csv("sunburst.csv", encoding = 'UTF-8')

sun_tot <- sun_tot[, c(1,2,3)]


# Define UI for application that creates a Sunburst Diagram

ui <- fluidPage(

  titlePanel("Suicide Worldwide: Should you be worried"),

  sidebarLayout(

    sidebarPanel(sliderInput("YearInput", "Select year(s)", 
                             min = 1985, 
                             max = 2016,
                             value =c(1985:2016),sep = "")), 
                 #uiOutput("Sun_colOutput"))

    mainPanel(plotOutput("SunburstPlot"), 
              br(), 
              br(), 
              br(), 
              tableOutput("results"))
  )
)

# Define server logic required to create a Sunburst Diagram

server <- function(input, output) {

    output$SunburstPlot <- renderPlot({

    sunburst(sun_tot[,c(2,3)],percent = FALSE, count = TRUE)
  })


    output$results <- renderTable({
      sunburst_fil()
    })
}

# Run the application 
shinyApp(ui = ui, server = server)

Не уверенчто мне не хватает, я действительно новичок в использовании блестящих.

...