r - head() 関数は「for」ループ内では機能しませんか?

Question

for ループを使用して数行を出力してみました。これがコードです。奇妙なことに、 head() 関数では機能しません。に置き換えるhead()と動作しprint()ます。

kw_id=c('a','b')
keyword_text=data.frame(col=c('a','b'), col2=c(1,2), row.names=(c('r1','r2')))

for (i in 1:2) { 
   plot_data<-subset(keyword_text,col==kw_id[i])
   print(plot_data)
   head(plot_data)
}

誰か助けてくれませんか？機能と関係があると思いhead()ます。