Как использовать gcheckboxgroup в цикле for в R

Question

Я очень плохо знаком с программированием на R GUI. Я хотел, чтобы пользователь динамически выбирал столбцы в кадре данных, а затем динамически выбирал уровни выбранных столбцов.

Мое намерение состоит в том, чтобы позволить пользователям выбирать столбцы и значения фильтра, а затем фильтровать кадр данных по ним. Для получения имен столбцов я получаю правильные значения. Однако при извлечении уровней выбранного столбца выход из цикла for и выбранные значения не фиксируются в переменных cba и cbv.

items<-colnames(joined_final)
items<-levels(joined_final$State)
cbg<-gcheckboxgroup(items,cont=TRUE,use.table = TRUE, index=TRUE,container = w)
cb<-svalue(cbg,index=TRUE)
j<-length(cb)
func(joined_final,j,cb)

func<-function(joined_final,j,cb){
cbv=c()  
for (i in seq(j)){
    items_1<-levels(joined_final[,cb[i]])
    cba<-gcheckboxgroup(items_1,cont=TRUE,use.table = TRUE, container = w)
    cbv<-svalue(cba)
  }
 return(cbv)
}

Пожалуйста, помогите мне с этим. заранее спасибо