救救孩子的论文吧呜呜.我是想给这个dataframe（res_mod \$run_model）增加一列，但是报错，更改这个dataframe原有的列数值也是报这样的错，我用merge合并两个表格也是报这样的错
> res_mod\$run_model\$cost<-c(1,2)
Error in `\$<-.data.frame`(`\*tmp\*`, run_model, value = list(qaly = c(6380.47021657588,  :
  替换数据里有2行，但数据有0

但是我将这个dataframe重新赋值给一个新的dataframe就可以增加新的列，这是为什么呀，怎么解决呢？
> b<-res_mod\$run_model
> b\$run_model\$cost<-c(1,2) #这样是可以增加新的列的