R应用程序DT：使用大于

我正在使用R构建一个闪亮的应用程序，在应用程序中，我需要显示一个表，可以对数字、字符和因子列应用过滤器

我正在使用DT包，下面是代码示例：

# packages
library(shiny)
library(DT)

# ui
ui <- fluidPage(
    br(),
    DT::dataTableOutput("my_iris")
)

# server
server <- function(input, output) {
    output$my_iris <- DT::renderDataTable({
        datatable(
            data = iris,
            filter = list(
                position = "top",
                clear = FALSE,
                plain = TRUE
            )
        )
    })
}

# Run the application 
shinyApp(ui = ui, server = server)

#包
图书馆（闪亮）
图书馆（DT）
#用户界面
ui我知道这是一个很老的帖子，但为了以防万一，我找到了一种方法。这可能不是最好的解决方案，也不是@agila试图找到的解决方案。。但是在这里

library(shiny)
library(DT)
shinyApp(
    ui = fluidPage(
        fluidRow(
            column(12,
                   DTOutput('table')
            )
        )
    ),
    server = function(input, output) {
        output$table <- renderDT(iris,
                                 filter = "top",
                                 options = list(
                                     pageLength = 5
                                 )
        )
    }
)

库（闪亮）
图书馆（DT）
shinyApp(
ui=fluidPage(
fluidRow(
第（12）栏，
DTOutput（'表'）
)
)
),
服务器=功能（输入、输出）{
输出$table Hi Eva！非常感谢您的回答，但我不明白它是如何解决我的问题的。您可以添加更多详细信息吗？我仍然不知道如何仅选择满足Sepal.Length>5等条件的行。