r - R：sapply印刷結果

Question

私はこれを行っているコードを持っています：

sapply(unique(groups.50),function(g)data$SEQUENCE_ID[groups.50 == g])

しかし、RGuiウィンドウでは、上にスクロールして結果の一部を表示することしかできません。最初の10個ほどはウィンドウに表示されません（おそらく私のデータが非常に大きいためです）。すべてを表示するにはどうすればよいですか、または最初の10件の結果を印刷するにはどうすればよいですか？

ありがとう。

Answer 1

大きなデータセットをスクロールする場合、pagewith関数method='print'も非常に便利です。コマンド履歴が出力で乱雑にならないという追加の利点があります。

Answer 2

関数の出力がベクトルであると仮定して、それをオブジェクトに保存してからサブセット化します。

a <- sapply(unique(groups.50),function(g)data$SEQUENCE_ID[groups.50 == g])
a[1:10]

または使用head：

head(sapply(unique(groups.50),function(g)data$SEQUENCE_ID[groups.50 == g]),n=10)

Answer 3

あなたは試すかもしれません

x<-sapply(unique(groups.50),function(g)data$SEQUENCE_ID[groups.50 == g])
head(x)

しかし、おそらく代わりにtapplyを使用する必要がありますか？