Как увидеть в «BOX ()» в R (блестящий) текст реактивной части

Question

Я пытаюсь увидеть текст из реактивной части в поле (), но не знаю, почему он не отображается.

ru ui.R:

 fluidRow(
 box(title = "Status summary", solidHeader = TRUE, status = "primary", width = 4, textOutput("selected_var"))),

на сервере. R:

server = function(input, output) {
 output$selected_var <- renderText({"You have selected this"})
}

Я вижу:

Заранее спасибо

Answer 1

Трудно точно понять, что не так, не видя полностью воспроизводимого примера. Но ваш синтаксис basi c выглядит нормально.

Вот полный пример, показывающий правильное отображение textOutput в box():

# app.R

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(),
  dashboardSidebar(),
  dashboardBody(
    box(
      title = "Status summary", 
      solidHeader = TRUE, 
      status = "primary", 
      width = 4, 
      textOutput("selected_var")
    )
  )
)

server <- function(input, output, session) {
  output$selected_var <- renderText("Your input is X")
}

shinyApp(ui, server)