R-如何对MICE软件包中的输入数据运行prcomp

在R中运行mice功能后，我不确定如何通过prcomp运行PCA分析

如果我跑步：

imp <- mice(Data, maxit = 20, m = 5)

---

imp这里是一个最小的可复制示例。行在有#的地方结束<（a）创建随机数据，席氏（x）＝PaSTE0（x），[x:10，]＝NA，添加错度，x＝x，鼠标= x（x），使估算数据集（p*COMP（x.鼠））不起作用，x.PRCOMPL=（x.鼠，PRCOMP（cBa（xa，xb，xd，xe，xf，xg，xh，x，xJ））代码>可重复的例子：库（鼠标）×x＝数据。框架（矩阵（RMym（100），10，（x.prcomp）#不起作用#

fit <- with(imp, lm(chl ~ age + bmi))
pool(fit)