將循環結果讀入矢量 - R語言

Question

我正在分析特定播放器的棒球數據。我有一個來自他所有季節的統計數據。

下面是我的代碼，它運行成功，它返回到控制檯。

我想做一個小改動。我不想讓代碼在控制檯上打印大於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功能。