Как отображать текст + визуализированный текст горизонтально в текстовом поле?

Я хочу создать столбец из 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 })
...

это даст мне текстовые поля только со значением, и я могу получить информационные поля со значками, но мне просто нужно небольшое поле с надписью «Мин: 'var1_min'», а другое с «Макс: 'var2_max'», но мне это не ясно как добавить текст.


rstudio r shiny shinydashboard
person pmdaly    schedule 25.08.2015    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Вы можете использовать paste или sprintf и т. д. для создания текста с подставленными переменными. Например,

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

Или, если вы хотите, чтобы «Max:» не отображался, возможно, что-то с использованием fluidRow

fluidRow(
    column(width=1, "Max:"),
    column(width=1, verbatimTextOutput("var1_max"))
)
person Rorschach    schedule 25.08.2015