R Shinyチェックボックスグループフィルタがチェックされていない場合

Question

データをサブセット化するために使用される一連のチェックボックスが、shinydashboardサイドパネルにあります。すべてのバー1グループに選択されたボックスがチェックされています。最後のグループには1つのオプションしかなく、デフォルトはチェックされていません。データセットのバイナリ変数（0、1）を指しています。チェックを外すと、フィルタは適用されません。チェックされている場合、フィルタは1の値に部分集合します。

は、これまでのところ私は、UI

checkboxGroupInput("patFilt", 
        label = h5("Filter by patient cohort"), 
        choices = c("Patient cohort" = 1), 
        selected = 0, 
        width = "100%") 

でこれを持って、私のserver.Rに私が

subsetArg <- reactive(list(
    input$group1, 
    input$group2, 
    input$group3, 
    etc., 
    ifelse(is.null(input$patFilt), c(0, 1), 1) 
)) 

サブセットがsubsetArgは、引数を渡すの関数で行われています。

しかし、この単一のチェックボックスでは、デフォルトのオプションは、ボックスがチェックされるまで0と表示された観測値を返し、1と表示された観測値を正しく返します。興味深いことに、c（0,1）をc（1,0）チェックされていないオプションは1とマークされた観測値を返します。したがって、subsetArgはベクトルの最初の値だけを返します。

デフォルトでは2つのチェックボックスが両方選択されているが、このチェックボックスをオフにしても機能しない場合は、この機能が動作します。

このチェックボックスをオフにすると、すべての観測値が返されます。

おかげifelse（）が動作しなかった理由（is.null（入力の$ patFilt））、C（0,1）は、他の1

がわからない場合は

を使用して解決

Answer 1

。