R 如何在fluidPage中呈现数据

我有以下概念性问题：如何在fluidPage中呈现数据。下面是继续回答问题的代码：

---
title: "Dashboard"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
runtime: shiny
---

我希望变量1和2是：

variable1 <- dataset %>% summary(total = sum(sales))
variable2 <- dataset %>% summary(mean = sum(sales))

variable1%汇总（总计=总计（销售））
变量2%汇总（平均值=总额（销售额））

---

你能帮我提些建议吗？谢谢。

你是新来的吗？因为通常的模式是在UI中有某种类型的“输出”对象，然后在服务器代码中调用“渲染”来绘制数据。你这两样东西都没有。您希望如何在网页中呈现此数据？如果您包含一个简单的示例输入和所需的输出，可以用来测试和验证可能的解决方案，那么就更容易为您提供帮助。Hello@MrFlick，我正在开发一个rmarkdown仪表板，到目前为止，它可以与renderPlot和renderDataTable一起使用。但概念上的问题是fluidPage是否可以包含反应值。您的意思是，如果我尝试输出$variable1，流体页面不能直接“保存”反应值，但它可以包含一个

DTOutput

占位符，您可以使用要填充的数据集调用

renderDT（）

（至少这就是为什么我假设您包含了

library（DT）

）。这里有一些例子：你好@MrFlick，太好了！，我尝试了一个接一个的代码来显示fluidPage每个单元格中的值（没有成功），但是您提供的链接给了我一些想法。非常感谢。

dataset <- eventReactive(input$button_execute, {
# SQL query 
dataset <- dbFetch(rs)
})

fluidPage(
  fluidRow(
    column(2,""),
    column(8,variable1, style="text-align: center;")),
    column(2,variable2, style="text-align: center;"))
  )
)

variable1 <- dataset %>% summary(total = sum(sales))
variable2 <- dataset %>% summary(mean = sum(sales))