renderDataTable的选项被忽略

Question

Shiny中renderDataTable的选项不起作用。这是我用的。

shinyServer(function(input, output) {   
     dataInput <- reactive({input$text})
     output$table1 <- renderDataTable({(options = list(pageLength = 10))

该表始终显示默认长度25.我希望长度为7,6,8,9,10