r - R: sapply 打印结果

Question

我有这样做的代码：

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

但是在 RGui 窗口中，我只能向上滚动查看一些结果。前 10 个左右没有显示在窗口中（可能是因为我的数据太大）。如何让它显示所有内容，或者如何打印前 10 个结果？

谢谢。

Answer 1

对于滚动浏览大型数据集，page函数 withmethod='print'也非常方便。它还有一个额外的好处，就是不会让您的命令历史记录与输出混淆。

Answer 2

你可以试试

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

但是您可能应该改用tapply？

Answer 3

假设您的函数输出是一个向量，将其保存到一个对象，然后是子集：

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)