2012-04-09 7 views

答えて

5

あなたの変数はdata.frameの列として配置されている場合は、あなたがlapplyを使用することができます。

df <- data.frame(aa = rpois(10, 4), bb = rpois(10, 3), c = rpois(10, 7)) 

tabList <- lapply(df, table) 

その後、あなたはさまざまなテーブルのリストを得る:

> tabList 
$aa 

1 3 4 5 6 7 
2 3 2 1 1 1 

$bb 

1 2 3 4 5 
1 2 4 1 2 

$c 

3 4 5 6 7 9 11 12 
1 1 1 3 1 1 1 1 

EDIT:

複数のdata.framesにまたがる変数の場合は、リストに入れてからlapply再び:

df2 <- df[sample(rownames(df), 15, replace = TRUE), ] 

df3 <- df[sample(rownames(df), 20, replace = TRUE), ] 

dfList <- list(df = df, df2 = df2, df3 = df3) 

lapply(dfList, function(x) lapply(x, FUN = table)) 
+0

完璧!どうもありがとう。変数が同じデータフレームのものでない場合、類似したものはありますか? – user702432

+0

@ user702432これも可能なはずです。以下の私の提案を見てください**編集** – BenBarnes

+0

優秀。 BenBarnesに感謝します。 – user702432

関連する問題