Включить / отключить не работает с FlexDashboard + блестящий - PullRequest
Новая
       23

Включить / отключить не работает с FlexDashboard + блестящий

1 голос
/ 24 сентября 2019

Мне известно о этой проблеме , и она, очевидно, решается, но я дважды проверил, у меня есть последние версии соответствующих пакетов, и ни disable, ни disabled, похоже, небыть работающим.

Минимальный пример: 

---
title: "test"
runtime: shiny
output: 
  flexdashboard::flex_dashboard

---

```{r global, include=FALSE}

library(shiny)
library(shinyjs)
library(flexdashboard)
```

```{r}
print(sessionInfo())

disabled(checkboxGroupInput("a", label = "heck", choices = 1:3))
disable(id = "a")
```

Информация о сеансе: 

R version 3.6.0 (2019-04-26)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 17763)

Matrix products: default

locale:
[1] LC_COLLATE=English_United Kingdom.1252 
[2] LC_CTYPE=English_United Kingdom.1252   
[3] LC_MONETARY=English_United Kingdom.1252
[4] LC_NUMERIC=C                           
[5] LC_TIME=English_United Kingdom.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] flexdashboard_0.5.1.1 shinyjs_1.0           shiny_1.3.2          

loaded via a namespace (and not attached):
 [1] Rcpp_1.0.2      digest_0.6.21   later_0.8.0     mime_0.7       
 [5] R6_2.4.0        jsonlite_1.6    xtable_1.8-4    magrittr_1.5   
 [9] evaluate_0.14   stringi_1.4.3   promises_1.0.1  rmarkdown_1.15 
[13] tools_3.6.0     stringr_1.4.0   httpuv_1.5.2    xfun_0.9       
[17] yaml_2.2.0      compiler_3.6.0  htmltools_0.3.6 knitr_1.25

1 Ответ

0 голосов
/ 24 сентября 2019

Кто-то опубликовал и удалил комментарий, сказав, что мне нужно использовать shinyjs::useShinyjs(), что было в значительной степени правильно, хотя, если быть точным, оно должно быть useShinyjs(rmd = TRUE).Если ОП видит это, не стесняйтесь писать как ответ, чтобы вы могли получить надлежащий кредит.

...