R-随机森林没有正确加载

Question

我在加载随机森林模型并将其应用于带有栅格::预测的栅格时遇到问题。

通常，当我在R会话中创建随机森林模型时，键入其名称并点击回车，我会收到以下打印输出：

> rf_model
Call:
 randomForest(formula = AGB_mean ~ B1_med + B2_med + B4_med +      B5_med + B6_med + B7_med + B1_sd + B2_sd + B4_sd + B5_sd +      B6_sd + B7_sd + NDVI + EVI + EVI2, data = all.training, importance = TRUE, na.action = na.roughfix) 
               Type of random forest: regression
                     Number of trees: 500
No. of variables tried at each split: 5

          Mean of squared residuals: 4866.287
                    % Var explained: 52.48

当我使用predict将此会话内模型应用于光栅时，我可以进行成功的预测。

当我改为使用readRDS加载保存的随机林模型并键入模型名称时，如下所示：

> rf_model <- readRDS('model.rds')
> rf_model

我收到rf_model中所有信息的完整打印件（即rf_model$call，rf_model$type...rf_model美元术语），当我尝试进行预测时，我收到以下错误：

Error in UseMethod("predict") : 
  no applicable method for 'predict' applied to an object of class "c('randomForest.formula', 'randomForest')"

在正确加载随机森林对象时，我是否遗漏了什么？

Answer 1

您需要导入随机林库，以便可以使用随机林对象的预测方法，如下所示：

library(randomForest)
rf_model <- readRDS('model.rds')
predict(rf_model)

即使您已在RDS文件中保存了一个随机森林实例，与随机森林实例关联的函数方法也不会保存在该RDS文件中，需要从库本身加载。

Answer 2

例如：

library(randomForest)
rf_model <- randomForest(Species ~ .,data=iris)
saveRDS(rf_model,'model.rds')
quit()

如果我再次启动R，我需要加载库：

rf_model <- readRDS('model.rds')
predict(rf_model)
Error in UseMethod("predict") : 
  no applicable method for 'predict' applied to an object of class "c('randomForest.formula', 'randomForest')"

library(randomForest)
head(predict(rf_model))

     1      2      3      4      5      6 
setosa setosa setosa setosa setosa setosa 
Levels: setosa versicolor virginica