这个包只能对30个特征以下的变量进行解释。
library(shapr)
predict(stem_train_fit,test_split,type='prob')
X <- train_split[,-1] %>% as.matrix()
explainer=shapr(X,stem_train_fit %>%
extract_fit_engine(),n_combinations = 10000)
这个包只能对30个特征以下的变量进行解释。
library(shapr)
predict(stem_train_fit,test_split,type='prob')
X <- train_split[,-1] %>% as.matrix()
explainer=shapr(X,stem_train_fit %>%
extract_fit_engine(),n_combinations = 10000)