基于另一变量分布的直方图仓的颜色

Question

好吧，这是一个棘手的问题。这可能是不可能的。

test<-data.frame(var.a=c(1,1,1,1,2,2,2,3,3,3,3,3,4,4,5,5,5,5), var.b=c(1,2,1,3,2,3,4,3,2,2,1,2,1,2,3,4,1,2)) 

是有可能的色彩为基础的var.b分布的HIST（测试$ var.a）直方图的每个区间？这样我可以知道在hist（test $ var.a）的bin 1中有var.b的50％“ones”，25％“twos”和24％“threes”？每个垃圾箱内有堆叠的酒吧？

我想某种spinogram然而，酒吧不应该有相同的高度（因为他们代表var.a的频率），并且在每个酒吧里var.b的频率应该是彩色编码。

非常感谢

Answer 1

ggplot2有你要找的：

test<-data.frame(var.a=c(1,1,1,1,2,2,2,3,3,3,3,3,4,4,5,5,5,5), var.b=c(1,2,1,3,2,3,4,3,2,2,1,2,1,2,3,4,1,2)) 

library(ggplot2) 
qplot(test$var.a, binwidth = 1, fill = factor(test$var.b)) 
ggsave("stacked_histogram.pdf") 

Answer 2

因为我爱基础R

test<-data.frame(var.a=c(1,1,1,1,2,2,2,3,3,3,3,3,4,4,5,5,5,5), 
       var.b=c(1,2,1,3,2,3,4,3,2,2,1,2,1,2,3,4,1,2)) 

一个班轮

barplot(table(test$var.b, test$var.a))