J'essaie de créer une application brillante en utilisant la fonction conditionalPanel
partir d'un paquet shiny
. La condition doit être écrite en JavaScript
mais j'aimerais pouvoir utiliser une condition comme suit (écrit en R)
"TP53" %in% unlist(input$ModelVariables)
La documenatation déclare:
Condition – Une expression JavaScript qui sera évaluée à plusieurs reprises pour déterminer si le panneau doit être affiché.
Je ne connais pas le JavaScript
. J'ai essayé input.ModelVariables == 'TP53'
mais cela ne fonctionne pas lorsque input.ModelVariables
a une longueur supérieure à 1.
Mon fragment sidebarPanel
avec conditionalPanel
est en dessous
checkboxGroupInput("ModelVariables", label = h3("Which variables to view?"), choices = list( "cohort", "stage", "therapy", "TP53", "MDM2" ), selected = list("TP53") ), conditionalPanel(condition = "'TP53' in unlist(input.ModelVariables)", checkboxGroupInput("ModelVariablesTP53", label = h3("Which mutations to view?"), choices = list( "Missense", "Other", "WILD"), selected = list("Missense", "Other", "WILD") )
Selon cette réponse, cette condition devrait fonctionner (et cela fonctionne pour moi) condition = "input.ModelVariables.indexOf('TP53') > -1"