R 数据未在绘图中呈现

我是新手，正在做家庭作业。我们需要在给定的数据集上为随机森林和特征交互做一个示例。当我运行代码时，我得到了绘图，但没有任何数据。请帮助我，因为我从来没有在R编程，我需要这样做。谢谢大家!

我已经尝试只使用没有N/A值的列

  X <- student_data_train %>%
    select(-GradePASS) %>%
    as.data.frame()

  predictor <- Predictor$new(rf_model, data = X, y = student_data_train$GradePASS)
  str(predictor)

  install.packages("devtools")
  library(devtools)
  interact <- Interaction$new(predictor, feature = "selfassesm")
  interact$plot()
  interact$results %>%
    ggplot(aes(x = reorder(.feature, .interaction), y = .interaction, fill = .class)) +
    facet_wrap(~ .class, ncol = 2) +
    geom_bar(stat = "identity", alpha = 0.8) +
    scale_fill_tableau() +
    coord_flip() +
    guides(fill = FALSE)

X%
选择（-GradePASS）%>%
as.data.frame（）
预测器请尽量使您的代码成为一个最小的和可复制的例子。。。通常，如果您的问题与最后一个绘图有关，那么90%的代码是不相关的，只需给我们一个
interact$results
示例，并仅保留绘图的代码。您好，抱歉，我现在编辑了我的代码。我收到以下错误消息：private$interaction.run.single中的错误（dataSample=data.sample，feature.name=c（功能，：任务1失败-“对所有（功能%in%colnames（grid.dat））的断言失败：必须为TRUE。”请尽量使您的代码成为一个最小且可复制的示例…通常，如果您的问题与最后一个绘图有关，那么90%的代码是不相关的，只需给我们一个
interact$results
，并仅保留绘图的代码。您好，抱歉，我现在编辑了我的代码。我收到以下错误消息：error in private$interaction.run.single（dataSample=data.sample，feature.name=c（feature，：task 1失败-“断言所有（features%在%colnames（grid.dat）中）”失败：必须为TRUE