server.r
lineups <- read.csv(paste0("Data/FD/lineups.csv"), stringsAsFactors = F) for (i in 1:150) { output[[paste0("table", i)]] <- renderTable(lineups[(i * 10 - 9):(i * 10), ]) }
ui.r
lapply(1:150, function(i) { tableOutput(paste0("table", i)) })
try using lapply in the server also.
lapply
explanation as to why for loops don't behave as you'd expect in this case here: renderUI uiOutput acts differently based on how list of outputs is defined
that was easy - thanks!
If your question's been answered (even by you!), would you mind choosing a solution? It helps other people see which questions still need help, or find solutions if they have similar problems. Here’s how to do it:
This topic was automatically closed 7 days after the last reply. New replies are no longer allowed. If you have a query related to it or one of the replies, start a new topic and refer back with a link.