r - easystats を使用してパースニップ オブジェクトから glmnet モデルをチェック中にエラーが発生しました: $ 演算子が無効です

Question

非常に単純な glmnet 分類タスクを使用して check_model を試みました。

ここからいくつかのコードを取得: tidymodel オブジェクトから単純なモデルを抽出する

library(magrittr)
library(tidymodels)
library(performance)

data(two_class_dat)

glm_spec <- logistic_reg() %>%
  set_engine("glmnet")

norm_rec <- recipe(Class ~ A + B, data = two_class_dat) %>%
  step_normalize(all_predictors())

glm_fit <- workflow() %>%
  add_recipe(norm_rec) %>%
  add_model(glm_spec) %>%
  fit(two_class_dat) %>%
  pull_workflow_fit()



performance::check_model(glm_fit)

Error: $ operator is invalid for atomic vectors