Fatal编程技术网
  • r/
  • R ggplot2中的注释栏

R ggplot2中的注释栏

r plot

R ggplot2中的注释栏,r,plot,ggplot2,bar-chart,R,Plot,Ggplot2,Bar Chart,在ggplot2中，我希望打印注释栏，以便条颜色的顺序与其他列匹配。此处，条形图“A”的颜色与y列一致（正确或错误），条形图“B”的颜色相同。我试着跟着，但没用 > (df <- data.frame(x=rep(1:5, 2), y=rep(c(T,F), 5), z=c(rep("A",5), rep("B",5)))) x y z 1 1 TRUE A 2 2 FALSE A 3 3 TRUE A 4 4 FALSE A 5 5 TRUE A 6

在ggplot2中，我希望打印注释栏，以便条颜色的顺序与其他列匹配。此处，条形图“A”的颜色与y列一致（正确或错误），条形图“B”的颜色相同。我试着跟着，但没用

> (df <- data.frame(x=rep(1:5, 2), y=rep(c(T,F), 5), z=c(rep("A",5), rep("B",5))))
   x     y z
1  1  TRUE A
2  2 FALSE A
3  3  TRUE A
4  4 FALSE A
5  5  TRUE A
6  1 FALSE B
7  2  TRUE B
8  3 FALSE B
9  4  TRUE B
10 5 FALSE B
> ggplot(data=df, aes(x=z, y=x, fill=y)) + geom_bar(stat="identity")+ coord_flip()

>（df-ggplot（data=df，aes（x=z，y=x，fill=y））+geom_-bar（stat=“identity”）+coord_-flip（）
改用
geom_tile

不清楚您期望的结果是什么。但是颜色的顺序是由它们作为因子级别的顺序决定的。@felasa请看附件中的图像。这就是我要找的，但是在a和B之间是否可能有一些空间，以便它看起来更像一个条形图。@cNinja-当然，有一个
宽度
argument to
geom\u tile
还有一个
height
参数，因此您不需要
coord\u flip
。

ggplot(data=df, aes(x=z, y=x, fill=y)) +  
 geom_tile(stat="identity",width=0.5)+ coord_flip()