Можно ли добавить собственный CSV или TXT-файл при работе с блестящим пакетом, чтобы сделать собственную панель для визуализации - PullRequest
Новая
       8

Можно ли добавить собственный CSV или TXT-файл при работе с блестящим пакетом, чтобы сделать собственную панель для визуализации

0 голосов
/ 30 января 2019

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

    ui <- dashboardPage(
  dashboardHeader(title = "Row layout"),
  dashboardSidebar(),
 dashboardBody()
)


 server <- function(input, output) { 

driver.csv <- read.csv("E:/RMARKDOWN/driver.csv.csv", fileEncoding = "UTF-8")

  New_DataSet1<-data.frame(driver.csv$ï..Year_AG,driver.csv$Severity_Desc,driver.csv$Injury.Type)
  New_DataSet1

  latest <- New_DataSet1[1:100,]
  latest

  d <- aggregate(latest$driver.csv.Injury.Type,  by=list(chkID = latest$driver.csv.Severity_Desc), FUN=sum)
  #barplot(d)
  renderplot(d$x)
  #barplot(d$x, xlab = d$chkID)
 # barplot(d$x, names.arg = d$chkID)

 }

 shinyApp(ui,server)
...