set.seed(123456)
elastic_train <- train(cluster_membership ~ ., data = data_multi, method = "glmnet",
                     tuneLength = 25, trControl = trainControl(method = "repeatedcv",
                                                               search = "random"))

elastic_mod <- glmnet(model.matrix(cluster_membership ~ ., data = data_multi),
data_multi$cluster_membership,family = "multinomial", alpha = elastic_net$bestTune$alpha,
lambda = elastic_net$bestTune$lambda)

coef(elastic_mod, s = 'lambda.min')

$flourisher
24 x 1 sparse Matrix of class "dgCMatrix"
                                        1
(Intercept)                  -1.097799622
(Intercept)                   .
genderFemale                  .
ethnicAsian                  -0.209824802
ethnicMaori/Pacific Islander  .
ethnicOther                  -0.976265266
age                           .
BMI                           .
BMR_kcal                      .
CRPmgL                        .
md_ndrink                     .
md_refresh                    0.262365972
md_sleep                      .
md_dstress                   -0.135152345
md_dwrkld                     .
md_dcreate                   -0.028441041
md_dpac                       0.007127653
md_dfruit                     .
md_dveg                       .
md_dchips                    -0.091275151
md_dsweets                    .
md_dsoftdrk                  -0.069636339
md_dmood_happy                1.514874739
md_dmood_sad                 -1.167555384

$normative
24 x 1 sparse Matrix of class "dgCMatrix"
                                      1
(Intercept)                  1.10289610
(Intercept)                  .
genderFemale                 0.11272708
ethnicAsian                  0.06757730
ethnicMaori/Pacific Islander .
ethnicOther                  .
age                          .
BMI                          .
BMR_kcal                     .
CRPmgL                       .
md_ndrink                    .
md_refresh                   .
md_sleep                     .
md_dstress                   0.01914515
md_dwrkld                    .
md_dcreate                   .
md_dpac                      .
md_dfruit                    .
md_dveg                      .
md_dchips                    .
md_dsweets                   .
md_dsoftdrk                  .
md_dmood_happy               .
md_dmood_sad                 .

$languisher
24 x 1 sparse Matrix of class "dgCMatrix"
                                        1
(Intercept)                  -0.005096477
(Intercept)                   .
genderFemale                  .
ethnicAsian                   .
ethnicMaori/Pacific Islander  .
ethnicOther                   0.037015029
age                           .
BMI                           0.105868542
BMR_kcal                      .
CRPmgL                        .
md_ndrink                    -0.027819620
md_refresh                   -0.020768855
md_sleep                      .
md_dstress                    .
md_dwrkld                     .
md_dcreate                    0.121300148
md_dpac                      -0.016322027
md_dfruit                     .
md_dveg                       .
md_dchips                     .
md_dsweets                    .
md_dsoftdrk                   .
md_dmood_happy               -0.032887466
md_dmood_sad                  1.028937162