Question

我使用R中的鼠标包对我的数据进行多次插补：

<script src="https://cdnjs.cloudflare.com/ajax/libs/Chart.js/2.7.0/Chart.min.js"></script>

<button onclick="changeFontSize();">Change Font Size</button>
<canvas id="ctx1"></canvas>
<canvas id="ctx2"></canvas>

我想在MI之后运行逻辑回归模型，并根据模型预测结果：

### multiple inputation by chained equations
imp.data <- mice(data, maxit = 5, m = 5, seed = 92385, print = F)

但是，predict命令不起作用：

model <- with(imp.data, glm(died ~ agecat + female_1 + insurance + mech + transfer +
                          iss + mxaisbr1 + maxais + cm_chf_1 + cm_mets_1 + cm_liver_1 +
                          cm_htn_c_1 + cm_bldloss_1 + state, family = binomial))

如果我的数据具有插补值会更简单，但是插补得到5个估算数据集，使得后期估计变得复杂。有什么想法吗？

谢谢！

Answer 1

我不确定推定的模型是保存为data.frame还是矩阵..

但是，如果您将模型转换为data.frame，则可以将感兴趣的列插入原始帧。

imp.data <- data.frame(imp.data)
original.df$NewImputtedColumn <- imp.data[, 1] # Assuming you want column 1

现在，您可以轻松保留重叠模型的副本，但仍然只能在预测模型中使用单个data.frame。

这是我倾向于做的事情，可能不是标准方式（我不确定）。

你只是从其中一个估算的模型中获取输入值，对吗？

在R中多次插补后预测

1 个答案: