複数の代入後にyハットを計算する関数で、アメリアの代入を呼び出す

Question

複数の代用後にyハットの得点を得ることが最終的には望みますが、アメリアは適合値を提供しません。私は特定のデータセットでそれを行うコードがありますが、私はデータセットに関係なくこれを行う関数を作ろうとしています。ような何か：num.impはamelia、またはmで使用されるインピューテーションの数がある

yhat<-function(a.out,num.obs,num.imp,model.qe){} 

。私は立ち往生午前ここは、しかし、次のとおりです。

a.outがamelia対象とnames(a.out$imputations)[1]戻り"imp1"であれば、なぜa.out$imputations$names(a.out$imputations)[1]がa.out$imputations$"imp1"と同じものを返しませんか？

a.out$imputations$names(a.out$imputations)[1]については、RはError: attempt to apply non-functionと表示しています。

個々の代入と変数内の汎用コールをどのように作成できますか？アメリアのドキュメント

library(Amelia) 

data(africa) 
a.out <- amelia(x = africa, cs = "country", ts = "year", logs = "gdp_pc") 

a.out$imputationsから取ら

Answer 1

例は、リスト内の

str(a.out$imputations) 

Elementsはそれぞれ帰属名前または数値インデックス

head(a.out$imputations$imp1) 
head(a.out$imputations[["imp1"]]) 
head(a.out$imputations[[1]]) 

によって呼び出すことができるリストでありますデータフレームです。データフレームは単なる特定の種類のリストであり、そのようにして要素を呼び出すことができます。

head(a.out$imputations[[1]]$country) 
head(a.out$imputations[[1]][["country"]]) 
head(a.out$imputations[[1]][[2]]) 
head(a.out$imputations[[1]][2]) 

これらのメソッドの最後は、1列のデータフレームを返すという点で残りとは異なりますが、他のメソッドはベクターを返します。あなたはf.ex

a.out$imputations[[1]][3, 2] 

または

a.out$imputations[[1]][[2]][3]