错误：新列将在现有列之后留下空洞

Question

好的，我试图有条件地调整数据帧中给定列中的某些值。 我的代码如下所示：

adjust_LAP<-function(LA){
  x<-LAP[LAP$LA.ID==LA,]
  y<-known[known[,1]==LA,]

  LAP_adj[LAP_adj$LA.ID==LA,LAP_adj$T1_1AGE0_4M]<-x$T1_1AGE0_4M-y$T1_1AGE0_4M
  return(LAP_adj)
}

LAP_adj<-LAP
y<-sapply(known[,1],adjust_LAP)

基本上 - 已知和LAP都具有相同的列。已知包含仅用于LAP中行的子集的行 - 包括唯一标识符（LAP中的LA和已知[，1]）。因为它们不一定是相同的顺序，所以我在调整特定列之前将每个数据框子集化为仅包括相关行。然而，已知的行比LAP少，因为不是每行都需要调整。

我收到错误＆＃34;新列会在现有列之后留下漏洞＆＃34;我无法弄清楚原因。

我在这里缺少什么？