r闪亮错误：无法强制上课＆＃34;＆＃34;功能＆＃34;＆＃34;到data.frame

Question

我想按用户导入数据集并编辑r脚本中的一些单元格，比如将第三个单元格更改为99，但它会显示错误消息：错误：无法强制执行类＆＃34;＆＃34;功能＆＃ 34;＆＃34;到data.frame。

server <- function(input, output) {

output$contents <- renderTable({

req(input$file1)

df <- read.csv(input$file1$datapath,
               header = input$header,
               sep = input$sep)
df[1,3]=99
df
})
output$downloadData<-downloadHandler(
filename=function(){
  paste("data",".csv",sep="")
},
content=function(file){
  write.csv(df,file)
}
)
}