Ich habe eine Shiny App entwickelt, die perfekt auf meinem Laptop funktioniert, aber wenn ich auf dem Server bin, bekomme ich "Error: subscript out of bound". Das Problem scheint in diesen LinienGlänzendes Problem: Index außerhalb der Grenzen
ui.R
sidebarPanel(
selectInput('matches2TeamFunc', 'Select function', IPLMatches2TeamsFuncs),
selectInput('match2', 'Select matches', IPLMatches2Teams,selectize=FALSE, size=20),
uiOutput("selectTeam2")
),
server.R
output$IPLMatch2TeamsPlot <- renderPlot({
m <- strsplit(as.character(input$match2),"-")
print("Hello")
t1 <- m[[1]][1]
t2 <- m[[1]][2]
print(length(m))
teams <- c(t1,t2)
print(teams)
# Load all IPL batsmen
output$selectTeam2 <- renderUI({
selectInput('team2', 'Choose team',choices=teams,selected=input$team2)
})
otherTeam = setdiff(teams,input$team2)
print("Next")
print(otherTeam)
print(input$team2)
analyzeIPLMatches2Teams(input$match2,input$matches2TeamFunc,input$team2,otherTeam)
wo Eingang $ match2 = "Kolkata Knight Riders-Rajasthan Royals-Allmatches" zu sein.
I t1 wollen = "" Kolkata Knight Riders“& t2 = "Rajasthan Royals"
Es gibt keine Frage, wenn dieser lokal ausgeführt
Jeder Vorschlag, wie dieses Problem zu beheben stark wäre geschätzt