Как я могу объединить нереактивные значения с реактивными значениями для заголовка графика? R Shiny

Question

У меня возникли проблемы с именованием заголовка графика, который содержит нормальную строку И реактивное значение / с.

Я пытаюсь сделать что-то вроде этого: main = "Изучение: " + input$userInput

Сообщение об ошибке: не числовой аргумент бинарного оператора. Кто-нибудь знает, как это исправить?

Answer 1

Приведенный ниже код может дать вам то, что вам нужно.

library(shiny)
ui <- basicPage(
  uiOutput("test"),
  plotOutput("plot1")
)
server <- function(input, output) {
  output$test <- renderUI({
    selectInput("dummy", "Select one value", c(mtcars$qsec))
  })
  output$plot1 <- renderPlot({
    plot(mtcars$wt, mtcars$mpg, main = paste0("this is main ",input$dummy,""))
  })
}
shinyApp(ui, server)

Использование selectInput для тестирования вашего требования. Сделайте необходимые изменения для вашей актуальной проблемы.