在for循环中更新数据帧

Question

这个问题的重点是我想知道如何在for循环或函数内部更新数据帧。因此，我知道还有其他方法可以完成我正在查看的特定任务，但是我想知道如何以尝试执行的方式进行操作。

我有一个数据框，其中有15列，并且有大约98和99s的2k观测值。对于其中任何变量/列都有98或99的每一行，我想删除整行。我创建了一个函数来按不等于98/99的变量名进行过滤，并使用lapply。但是，它不会连续更新数据帧，而是吐出一系列数据帧，覆盖先前的数据帧，这意味着最后，我将仅获得清除了最后一列的数据帧。如何获取它以按顺序更新每一列的数据帧？

nafunction = function(variable){
  kuwait5=kuwait5%>%
    filter(variable<90)
}

`nafunction = function(variable){
  kuwait5=kuwait5%>%
    filter(variable<90)
}
       lapply(kuwait5, nafunction)`

预期结果是一个新的数据框，其中所有已删除98的行。我得到的是一系列数据帧，每个数据帧都有一列，其中删除了带有NAS的行。