Why does this display one table 150x instead of 150 unique tables?

shiny
#1

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))
                        })
#2

try using lapply in the server also.

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

1 Like
#3

that was easy - thanks!

#4

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:

#5

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.