This is the same issue i posted here
I have a big tibble having 7000 rows and 10000 columns. I want to filter row if it has at least one non zero element across all columns. I wrote the following code which works fine on small tibble. As soon as I increases number of columns it breaks
Can anyone tell where is the glitch ?
Here, logic is not the issue. However, the problem is weird behaviour of filter_if
library(tidyverse) ncol = 10000 nrow = 7000 rr = sample(c(0,1) , nrow * ncol , replace = TRUE) %>% matrix(ncol = ncol) %>% as.data.frame() %>% as_tibble() rr %>% dplyr::filter_if(is.numeric , .vars_predicate = any_vars(. != 0 )) #> Error: evaluation nested too deeply: infinite recursion / options(expressions=)?
Created on 2019-07-19 by the reprex package (v0.3.0)