如何正确地将拟合的线性模型导出到rds文件并在以后重新创建它？

Question

类似于此post和此one（但用rds代替dput）

假设由于某些原因，您必须：

1. 使用saveRDS（而不是dput）
2. 将rds文件加载到程序中（作为二进制文件）
3. 将该二进制文件的内容作为字符串返回到R

您将使用什么函数在R中重建模型？

Answer 1

“在R中重建模型” 的含义还不清楚。我假设您要存储线性模型的输出，然后稍后（也许是从新的R端子中）重新读取对象。

这是一个可重复的最小示例：

# Fit a linear model
fit <- lm(mpg ~ disp, data = mtcars)

# Save as RDS
saveRDS(fit, file = "my_fit.rds")

# Clean up the workspace (or quit R)
rm(fit)

fit <- readRDS("my_fit.rds")
fit
#
#Call:
#lm(formula = mpg ~ disp, data = mtcars)
#
#Coefficients:
#(Intercept)         disp
#   29.59985     -0.04122