ダッシュボードでデータを読み取るために textareaInput を使用しています。以下のgsubオプションに基づいてベクトルに変換しようとしましたが、これを実行すると、すべての行として出力がfalseとして返されます。Varとして列を持つrdreportデータフレームにデータがあります-値はMark、Mark1、Mark2などです。
subset_dataset <-
eventReactive(input$go, {(rdreport$Var %in% (paste0('c("',(gsub('[\r\n]', '","', input$txt)),'")')))})
(paste0('c("',(gsub('[\r\n]', '","', input$txt)),'")'))
--> この部分では、textareaInput をベクトルに変換しようとしています。textarea への入力は、\n で区切られた Mark と Mark1 として与えられます。しかし、コードは機能していません。
誰かがこれについて助けることができますか?