Shiny отключить selectinput, но пользователи могут видеть доступные параметры, но я не могу их выбрать - PullRequest
0 голосов
/ 01 апреля 2020

Доброе утро, у меня есть selectinput с несколькими вариантами. Мне нужно, чтобы этот ввод был отключен, но пользователь может видеть доступные опции, но я не могу их выбрать.

Спасибо

Я имею в виду, у меня есть выделенный вход в виде блестящего со списком вопросы от 1 до 100. Как сделать так, чтобы человек видел вопросы, но не может их выбрать, например, отключить их. Это было бы отключено в Selectinput, но человек может видеть доступные опции.

selectInput (inputId = "question", label = "questions", choices = c ("question1", "question2", "question3", "question4", "question100")),

Спасибо

1 Ответ

0 голосов
/ 02 апреля 2020

Используя пакет shinyjs(), вы можете использовать функцию disable, хотя это не позволяет вам видеть выпадающий список. Итак ... только наполовину ответ на ваш вопрос, не уверен, что можно увидеть варианты.

library(shiny)
library(shinyjs)

#####/UI/####

header <- dashboardHeader()
sidebar <- dashboardSidebar()
body <- dashboardBody(
  useShinyjs(),
  selectInput(inputId = "question", label = "questions", 
              choices = c("question1", "question2", "question3", "question4", "question100" )
              )
)

ui <- dashboardPage(header, sidebar, body)

#####/SERVER/####
server <- function(session, input, output) { 

  shinyjs::disable("question")

  }

shinyApp(ui, server)

В зависимости от того, чего вы пытаетесь достичь sh, могут быть и другие способы получить тот же эффект (то есть не имея выпадающего списка, запустить реактив, если не выполнено другое условие, и т. д. c.)

...