在R，抽样数据的聚合中的Barplot
在R，抽样数据的聚合中的Barplot
提问于 2010-03-08 16:37:21
我想要一个堆叠的条形图，或者至少两个下面数据的条形图(直方图)。但我不知道怎么做。情节(在线)不是解决办法，我在找。请看下面的内容。
online offline
1 sehrwichtig wichtig
2 wichtig unwichtig
3 sehrwichtig unwichtig
4 sehrwichtig sehrwichtig
5 sehrwichtig sehrwichtig
6 sehrwichtig unwichtig
7 sehrwichtig unwichtig
8 wichtig wichtig
9 wichtig unwichtig
10 sehrwichtig sehrwichtig
11 sehrwichtig wichtig
12 sehrwichtig unwichtig
13 wichtig sehrwichtig
14 sehrwichtig wichtig--我知道我需要一个步骤，将数据聚合到：
online offline
sehrwichtig 6 7
unwichtig 0 1
wichtig 3 5 但是怎么做呢？
回答 5
Stack Overflow用户
回答已采纳
发布于 2010-03-08 17:28:27
该聚合只是对table在apply中的简单调用。
R> foo <- data.frame(online=sample(c("S","W","U"),10,TRUE),
offline=sample(c("S","W","U"),10,TRUE))
R> apply(foo,2,table)
online offline
S 3 1
U 4 5
W 3 4你可以把它输入barplot。
Stack Overflow用户
发布于 2010-03-10 12:14:30
使用ggplot2，您不需要预先聚合数据：
library(ggplot2)
qplot(online, data = df, fill = offline)
qplot(offline, data = df, fill = online)Stack Overflow用户
发布于 2010-03-08 18:51:51
#generate data
df<- read.table(textConnection('
online offline
sehrwichtig wichtig
wichtig unwichtig
sehrwichtig unwichtig
sehrwichtig sehrwichtig
sehrwichtig sehrwichtig
sehrwichtig unwichtig
sehrwichtig unwichtig
wichtig wichtig
wichtig unwichtig
sehrwichtig sehrwichtig
sehrwichtig wichtig
sehrwichtig unwichtig
wichtig sehrwichtig
sehrwichtig wichtig'
),header=T)
#factor levels should be the same
levels(df$online) <- levels(df$offline)
my_table <- t(aaply(df,2,table))
library(graphics)
barplot2(my_table,legend = rownames(my_table), ylim = c(0, 20))
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/2402885
复制相关文章
相似问题
腾讯云开发者
