ループ結果をベクトル - R言語で読む

Question

特定のプレーヤーの野球データを分析しています。私は彼のすべての季節からの統計データフレームを持っている。

以下は正常に実行され、コンソールに返されるコードです。

マイナーチェンジを1つ作りたいと思います。コードを40を超える時間をコンソールに出力させる代わりに、これをベクトルに読み込みたいと思います。

私は "Pujols_Over_40 < - c（Pujols $ HR [i]"）を試しましたが、うまくいかないようです。

ありがとうございました！

for(i in 1:nrow(Pujols)){ 
if(Pujols$HR[i] > 40){ 
print(Pujols$HR[i]) 
} 
} 
[1] 42 
[1] 47 
[1] 49 
[1] 41 
[1] 46 
[1] 43 

Answer 1

あなたは試みることができる：

Pujols.count=NULL 
for(i in 1:nrow(Pujols)){ 
if(Pujols$HR[i] > 40){ 
    Pujols.count=c(Pujols.count,Pujols$HR[i]) 
    print(Pujols$HR[i]) 
} 
} 
Pujols.count 

あなたは今もprint機能を取り除くことができます。