Drop all not numeric variables
Examples
data <- data.frame(a = 1:10, b = rep("A",10))
drop_var_not_numeric(data)
#> a
#> 1 1
#> 2 2
#> 3 3
#> 4 4
#> 5 5
#> 6 6
#> 7 7
#> 8 8
#> 9 9
#> 10 10
Drop all not numeric variables
data <- data.frame(a = 1:10, b = rep("A",10))
drop_var_not_numeric(data)
#> a
#> 1 1
#> 2 2
#> 3 3
#> 4 4
#> 5 5
#> 6 6
#> 7 7
#> 8 8
#> 9 9
#> 10 10