Как я могу получить коэффициенты модели glmnet в кадре данных?

Я обучил модель glmnet с помощью каретки

pen.params = expand.grid(lambda = exp(seq(-3,3,0.05)) , alpha = 1 )

model.penalized = train(y~.,
                        data = d.train,
                        trControl = fitControl,
                        tuneGrid = pen.params,
                        method = 'glmnet'
                        )

Я могу построить коэффициенты, используя различные инструменты, но я хотел бы иметь их в кадре данных. Я пытался использовать broom для извлечения коэффициентов с помощью tidy, но это дает мне только ненулевые коэффициенты.

Есть ли простой способ извлечь коэффициенты и параметр штрафа из модели и использовать их в виде столбцов в кадре данных?