# NOT RUN {
n <- 10000
d <- 5
data <- matrix(rnorm(n * d), ncol = d)
# No filtering
data_filtering(data)
# Filtering everything
data_filtering(data, 0.0)
data_filtering(data, rep(0.0, d))
# Filtering only the first col
data_filtering(data, c(0.0, rep(NA, d - 1)))
# }
Run the code above in your browser using DataLab