Ich versuche den Standardwert für den Geschlechtsfilter anzuwenden, um "alle" zu sein. Ich verwende filter_select (), um die Filter zu erstellen. Wenn die Taste zur Ausführung des Run -Berichts gedrückt wird, werden die gemeinsam genutzten Daten erstellt, die Filter generiert und das DataTable wird gerendert. Die Tabelle lädt und die Filter funktionieren, der Standardwert wird jedoch nicht festgelegt. Ich verwende die JS-Lösung aus diesem Beitrag.
Code: Select all
library(shiny)
library(DT)
library(crosstalk)
library(bslib)
# Sample data for demonstration
dat