R：sapply打印效果

我有一個這樣的代碼：R：sapply打印效果

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

但在RGUI窗口，我只能向上滾動，看到一些成果。前10個左右沒有顯示在窗口中（可能是因爲我的數據太大）。我怎樣才能把它展現出來，或者，我怎樣才能打印前10個結果？

謝謝。

2012-11-01 Judy

你可能想看看'？split'和/或'tapply' – Dason

對於滾動瀏覽大型數據集，函數與method='print'也非常方便。它還有另外一個好處，就是不會在輸出中混淆命令歷史記錄。

2012-11-01 15:02:02

代碼看起來像什麼？ – Judy

如果'd'是你的變量，'page（d，method ='print'）'。 –

謝謝！這正是我需要的！完美工作。 – Judy

假設你的你的函數的輸出是一個矢量，它保存到一個對象，然後子集：

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)

2012-11-01 14:49:36

我試過這樣做，但是我的一個結果太長了，以至於它沒有打印出每個項目。這是一個聚類分析，其中一個聚類有20K個項目。所以即使我做了n = 1這樣的事情，該集羣也不會完全打印出來，因爲它太大了。有任何想法嗎？ – Judy

是'a'數據框的列表嗎？我的猜測是你可以做一些像sapply（a，head）這樣的東西。 –

你可以嘗試

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

但是你應該使用tapply呢？

2012-11-01 14:50:29 AndrewMacDonald

你有使用tapply的鏈接嗎？我還是R的新手。 – Judy

@Nicole：'help（tapply）'。 –

回答