Question

我想创建一个包含3个小文本框的列，每个文本框都带有一个静态字符串和一个渲染值，如“max：153”。这就是我现在所拥有的。

# ui.R
...
verbatimTextOutput("var1_max"),
varbatimTextOutput("var1_min")
....

# server.R
...
output$var1_max <- renderText({ max(df()$feature })
output$var1_min <- renderText({ min(df()$feature })
...

这会给我带有价值的文本框，我可以获得带有图标的信息框，但我只想要一个小框，上面写着“Min：'var1_min'”，另一个带有“Max：'var2_max'”，但它不是向我明确如何添加文本。

Answer 1

您可以使用paste或sprintf等创建替换为变量的文本。例如，

output$var1_max <- renderText({ paste("Max:", max(df()$feature)) })

或者，如果你想要“Max：”不被渲染，可能会使用fluidRow

fluidRow(
    column(width=1, "Max:"),
    column(width=1, verbatimTextOutput("var1_max"))
)

如何在文本框中水平显示文本+渲染文本？

1 个答案: