你如何计算麦克法登的伪$R^2$使用cv.glmnetglmnet 包中的对象？

该deviance.glmnet函数提取偏差，但我需要空值（仅截取）似然性和具有 lambda 的模型的似然性，以最大限度地减少交叉验证错误。

这是我运行 glmnet 的代码——下一步是什么？

> fit_lasso <- glmnet(x, y, alpha=1, family="poisson", lambda.min.ratio=.001)
> fit_lasso_cv <- cv.glmnet(x, y, alpha=1, family="poisson", lambda.min.ratio=.001)