如何在for循环中使用函数并使用整列作为参数？

Question

我想要做的是创建一个for循环，其中整个数据列用作函数中的参数。我尝试了for循环代码。我在for循环中使用的函数是MAD函数，我希望找到每列四个值的异常值。

outliers<-for(D in NahOstRooi[,1:4]) {D[which((abs(D-median(D))/mad(D)) >2)]}

我得出的结果是NULL。

数据看起来像这样：

NahOstRooi <- plotslossfin[,c(2,3,4,63)]

> NahOstRooi
# A tibble: 4 × 4
   RnoSE  RnoSW  RnoNE  RnoNW
   <dbl>  <dbl>  <dbl>  <dbl>
1 0.7480 0.1267 0.6669 0.5484
2 0.8415 0.6157 0.6540 0.8428
3 0.8560 0.5858 0.6071 0.8171
4 0.8034 0.6479 0.6201     NA

我有点担心我完全滥用了for循环。我还尝试在弯曲括号内执行=而不是in。