在R中，追加＆＃34; 1＆＃34;对于列的所有值，我使用以下
data[,col] = paste(data[,col], "1", sep = "_")
这给了我很好的结果。 然而，当我尝试在Shiny内部进行时，情况并未发生。很抱歉无法共享可重现的代码。但我在闪亮中使用的代码如下。
proc_filt_good = reactive({
proc_filt_good[,1] = paste(proc_filt_good[,1], "1", sep = "_")
})
这给了我以下内容。
c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 17, 17, 17,
24, 24, 24, 24, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 26, 26, 26,
26, 26, 26, 27, 27, 27, 27, 27, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28,
28, 28, 28, 28, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29,
29, 29, 29, 29, 32, 35, 35, 35, 35, 35, 35, 35, 35, 36, 36, 36, 36, 36, 36,
42, 42, 54, 54, 60, 122, 122, 122, 122, 122, 127, 127, 127, 127, 128, 128,
128, 128, 128, 128, 128, 128, 128, 128, 128, 128, 128)_1
对此的任何帮助都会很棒。