2016-12-24 8 views
0

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

Antwort

0

Bitte ignorieren Sie dies. Der Fehler wurde möglicherweise aufgrund eines variablen Problems verursacht. Dies kann geschlossen werden. Ich habe es behoben.

Verwandte Themen