Feature selection using lasso or elastic network
Examples
library(dplyr)
meta_dat1 <- t(meta_dat) %>%
as.data.frame() %>%
dplyr::mutate(group=group)
result_ML_lasso <- ML_alpha(meta_dat1, method="lasso")
#> Loading required package: ggplot2
#> Loading required package: lattice
result_ML_lasso
#> feature s1
#> 1 C02045 0.41716402
#> 2 C00073 -0.04319325
#> 3 C03793 -0.02289240
#> 4 C00022 0.19301507
#> 5 C00255 -0.03705029
