Question

这看起来应该很简单，但我想在UI.R中的句子中包含一个在server.R中创建的变量。

例如，server.r：

averageSampleSize <- reactive({
    round(mean(sampleSizes()), 2)
})

在server.R中，我将其作为averageSampleSize（）

进行访问

我想在一个句子的UI中显示这个内容，例如“给定设置，在模拟中，所需的平均样本大小为XXX”

我尝试过在Server.r中包含的内容：

output$averageSampleSize <- renderText({averageSampleSize()})

在ui.R：

HTML("Given blah blah ...", textOutput("averageSampleSize")

没有运气。最后一种方法让我了解变量的存储方式（列表等）

这看起来很简单，但我无法理解。

Answer 1

例如：

library(shiny)

sampleSizes <- reactive(runif(100))
runApp(list(ui=bootstrapPage(
            textOutput("averageSampleSize")),
            server=function(input,output){
              averageSize <- reactive({
                round(mean(sampleSizes()), 2)
              })
               output$averageSampleSize <- renderText({paste('res=',averageSize())})
            }))

如何包含变量内联

1 个答案: