table()の集計って便利だけど、table()がはき出すデータってそのままじゃlatticeで使いにくよなぁ…と思っていたら、なんのことはないdata.frame()してやればいいだけだった事に気がつきました…。そんなの知らなかったよーー。オブジェクトのクラスがお互いにどういう関係になっているのかって分かりにくいよなぁ。
head(sample) #こんなデータ(sample)があった時。
dam level
1 post 20
2 post 20
3 post 20
4 post 20
5 post 20
6 post 20
summary(sample)
dam level
post:2477 0 :2804
pre :2477 2 : 175
5 : 52
10: 54
20:1869
table(sample) #table()してやるとこんな感じ。
level
dam 0 2 5 10 20
post 1461 52 7 7 950
pre 1343 123 45 47 919
data.frame(table(sample)) #data.frame()すると…
dam level Freq
1 post 0 1461
2 pre 0 1343
3 post 2 52
4 pre 2 123
5 post 5 7
6 pre 5 45
7 post 10 7
8 pre 10 47
9 post 20 950
10 pre 20 919
#plot()するならtable()が好都合で、
plot(table(sample))
#barchart()はdata.frame(table())が楽。
barchart(Freq ~ dam,
group = level,
data = data.frame(table(sample)),
stack = TRUE,
auto.key = list(
space = "right",
reverse.rows = TRUE,
points = FALSE,
rectangles = TRUE,
title = "level",
cex = 0.9
)
)