美好的一天,
我有一个数据框,例如:
sample.df = data.frame(a=c(-1,1,0,-1),b=c(2,NA,1,2),c=c(0,0,1,2),d=c(-1,-2,0,0))
我希望为每列生成一个堆积条形图,显示该列中每个唯一值出现的次数(忽略NA)。
我的第一个想法是创建一个新的数据框,其中可能的值为rownames(此处描述为Score),数据值是该列发生值的次数:
Score a b c d
2 0 2 1 0
1 1 1 1 0
0 1 0 2 0
-1 2 0 0 1
-2 0 0 0 1
我尝试过使用其他示例中的ddply,table和aggregate但是没有找到进入该结构的方法。
我的想法是,一旦我知道它应该直接将其交给条形图以获得堆积的条形图,显示每列中每个值的出现次数。
我感谢您给我的任何指导。
谢谢,
戴夫
关闭此循环,这是我结束的地方。
我使用了tcash21建议的融合(“得分”不在原始数据中,仅属于a,b,c和d)。另外,ggplot()给了我一个关于使用“y”和stat =“bin”的错误,所以我在ggplot()调用中删除了“y”的赋值。以下是我最终采取的步骤:
sample.df = data.frame(a=c(-1,1,0,-1),b=c(2,NA,1,2),c=c(0,0,1,2),d=c(-1,-2,0,0))
new.df<-melt(sample.df)
new.df<-new.df[complete.cases(new.df),]
new.df$Score<-as.factor(new.df$value)
ggplot(new.df, aes(x=variable, fill=Score)) + geom_bar()
答案 0 :(得分:2)
您需要使用融合将数据转换为适合ggplot的长形状:
new.df<-melt(sample.df, id.vars="Score")
ggplot(new.df, aes(x=Score, y=value, fill=variable)) + geom_bar()