Remove columns / variables having all values are 0

Remove columns / variables having all values are 0 from a tbl.

tbl_remove_vars_zero_all(tbl)

Arguments

tbl	a tbl.

Value

a tbl.

Examples

if (FALSE) {


 tbl <- tibble(x = letters[1:5] , y = LETTERS[1:5] , z = 0 )
 tbl
 tbl %>% tbl_remove_vars_zero_all()

 tbl2 <- tibble(x = letters[1:5] , y = LETTERS[1:5] , z = 0  , xx = 0:4)
 tbl2 %>% tbl_remove_vars_zero_all()
}