将值分配给FileInput对象

Question

我想知道是否可以在Shiny中手动将值分配给文件输入对象。我正在尝试这样做，但是似乎文件输入对象没有被更新：

file_data <- read.csv("file_data.csv", stringsAsFactors = FALSE)

for(i in 1:ncol(file_data)){
  #Not functional
  session$sendInputMessage(c('file1',file_data[1,i]), list(value=file_data[2,i]))
}

文件数据的结构如下：

因此，第1行包含我要包含在file_data中的每个子元素的名称，而第2行包含其所有值。