Rのループ：データフレームの出力を格納

Question

現在私が直面している問題は次のとおりです。 96個の観測（行）と16個の変数（列）のデータフレーム（Aと呼ぶ）があります。 私は16要素（Aの16個の変数のそれぞれの係数）の（Principal Components Analysisからの）9個の列ベクトルのローテーションも持っています。

PCA回転が等の保存されます。今

ph=prcomp(home[ ,3:17], scale. = TRUE) 
Home_vec=-round(ph$rotation[ ,1:9], 3) 

、単独IオブジェクトHome_vecによって自分のデータフレームの行の1つを乗算することができたし、出力することによって行を乗算に等しいです。 9つのPC列のそれぞれに、cbindを適用します。例えば

、行入力：

TEAM=c(5, 1503, 26.31, 16.2, 0.099, 33, 28, 368, 35, 15, 84, 942, 528, 33, 315) 

マイ新しい出力：私は私のデータに96回の観測のそれぞれについて、この手順を実行するためのループを作成した

TEAM.1=round(TEAM*Home_vec,3) 

フレーム。

F=function(x){ 
    x*Home_vec 
} 

for(i in 1:96){ 
    print(F(home[i,2:17])) 
} 

唯一の問題は、新しいオブジェクトとして出力（96 x 9データフレーム）を保存しようとしています。

何か助けていただければ幸いです。 ありがとうございます！

Answer 1

ループで次の操作を実行してください。

私はdplyrパッケージを使用しています。

x <- "" %>% data.frame 

for(i in 1:96){ 
y <- F(home[i,2:17])) 
x <- bind_rows(x,y) 
} 

x <- x %>% .[-1,-1]