"ERROR: path [1] =" ": Keine solche Datei oder kein solches Verzeichnis" beim Veröffentlichen eines parallelen Koordinatendiagramms mit Shiny

Ich habe ein Problem, das ziemlich häufig zu sein scheint, für das ich jedoch noch keine Lösung gefunden habe:

Wenn ich versuche, eine Webanwendung mit rCharts Parcoords zu veröffentlichen, erhalte ich den folgenden Fehler: FEHLER: Pfad [1] = "": Keine solche Datei oder kein solches Verzeichnis

Und das Seltsame ist, dass die App auf meinem Laptop perfekt läuft ...

Below ist eine einfache Version / ein Beispiel des Codes, den ich verwende. Bitte beachten Sie, dass Sie die Parcoords-Bibliothek heruntergeladen und in die Datei gestellt haben müssen, in der Sie arbeiten, bevor Sie den Code ausführen. Sein Pfad soll lauten: "Libraries / Widgets / Parcoords"

Danke im Voraus! :)

ui.R:

library(shiny)
library(shinydashboard)
library(rCharts)

sidebar <- dashboardSidebar(
width = 250,
sidebarMenu(id = "menu1"
              ,menuItem("Parallel Coordinates Chart", tabName = "parcoords", icon = icon("line-chart"))
  )

)


body <- dashboardBody(

tabItems(

       tabItem(tabName = "parcoords",
            fluidRow(
              column(10, offset = 1,
                     tabBox(width = 13.5,height=8,
                            id ="colors", 
                            tabPanel("Multicolor",showOutput("chart1", "parcoords")) )
            )
           )
    )
  )
)

shinyUI(dashboardPage(
  dashboardHeader( title = "Parallel Coordinates Chart"
                  ,titleWidth = 450),
  sidebar,
  body
))

server.R:

library(shiny)
library(shinydashboard)
library(rCharts)


shinyServer(function(input, output) {

dat <- Theoph

output$chart1 <- renderChart2({


      p1 <- rCharts$new()
      p1$setLib("libraries/widgets/parcoords")

      p1$set(padding = list(top = 50, bottom = 50,
                            left = 50, right = 50),
             width = 1200, height = 600)


      p1$set(
        data = toJSONArray(dat, json = F),
        range = unique(dat$Subject),
        colorby = 'Subject',
        colors = c('red', 'green', 'yellow','blue','black', 'pink', 'brown', 'orange', 'grey', 'maroon', 'plum')) 
      p1
    }

  )

})

Antworten auf die Frage(2)

Ihre Antwort auf die Frage