r语言多重插补

最新推荐文章于 2025-01-25 01:00:00 发布

郝好吃面

最新推荐文章于 2025-01-25 01:00:00 发布

阅读量3.1k

点赞数

本文链接：https://blog.youkuaiyun.com/Haohaochimianlei/article/details/105364091

版权

本文介绍了使用R语言进行多重插补的方法，包括数据预处理、缺失值检测、多重插补实现（通过mice库）以及插补结果的分析。通过lm函数建立模型，并用pool和complete函数对插补结果进行综合分析，展示了估算值、标准误差、t值和P值等关键统计指标。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

r语言多重插补

inputfile<-read.csv(“F:/rstudiospace/2019.3.7.csv”, header = TRUE)
View(inputfile)
is.na(inputfile) # 判断是否存在缺失
n <- sum(is.na(inputfile)) # 输出缺失值个数
n
par(mfrow = c(1, 2))
dotchart(inputfile$ET)

boxplot(inputfile$ET, horizontal = TRUE)

inputfile$ET[38] = NA
fix(inputfile)
library(lattice)
library(MASS)
library(nnet)
library(mice)
imp <- mice(inputfile, m = 4)
fit <- with(imp,lm(ET ~ time, data = inputfile))
pooled <- pool(fit)
summary(pooled)
result4 <- complete(imp, action = 3)