时间戳

首页 > 解决方案 > 无法在闪亮的 DT::renderdatatable 中显示页码

r - 无法在闪亮的 DT::renderdatatable 中显示页码

问题描述

我正在尝试在 Shiny 中呈现数据表，但输出不显示页码。

我尝试将 Paging、DOM 选项更改为各种参数，但无法使其工作

DT::renderDataTable(expr = { 
    sales_data_filtered() %>%
        group_by(class) %>%
        summarise(sales = sum(sales))%>%
    mutate(sales = scales::dollar(sales)) 

}, options = list(scrollY = "250px",dom = 't',
    pageLength = 5) )

在此处输入图像描述

标签： rshinydatatables-1.10

解决方案

试着重写一下。

  1. 将结果存储在单独的反应式表达式中：
result <- sales_data_filtered() %>%
            group_by(class) %>%
            summarise(sales = sum(sales))%>%
            mutate(sales = scales::dollar(sales))

你为什么要使用这个dom = 't'选项？这意味着，只有表格会被渲染。如果不需要，请摆脱它。

DT::renderDataTable(result(),
              options = list(
                  scrollY = "250px",
                  pageLength = 5,
                  lengthMenu = c(5, 10, 15, 20)
              ))

推荐阅读