Reputation: 464
Could you make a hint how to make a vertical scroll bar in rhandsontable table? I have not found a clear guidance so far. The earlier question is here.
The draft script is here:
UI side:
column(8,
rHandsontableOutput("loaded_table")
)
Server side:
output$loaded_table <- renderRHandsontable({
if (!is.null(descStat))
rhandsontable(descStat, maxRows = 20)
})
Upvotes: 1
Views: 1664
Reputation: 9809
Isn't there a vertical scroll by default?
I am seeing one in this example:
library(shiny)
library(rhandsontable)
ui <- fluidPage(
column(8,
rHandsontableOutput("loaded_table", height = "200px")
)
)
server <- function(input, output, session) {
output$loaded_table <- renderRHandsontable({
rhandsontable(iris, maxRows = 20)
})
}
shinyApp(ui, server)
Upvotes: 1