手动 select 堆叠水平条形图的详细信息
Manually select details of stacked horizontal bar chart
我有这个情节,想:
- 手动 select Y 轴上的问题(例如,会话详细信息等)出现的顺序(即,我希望会话详细信息是第 4 个而不是第 1 个)
- 手动 select 变量在条形图中出现的顺序(例如,我想同意成为第一个,等等)
- 使用十六进制值手动决定每个变量(同意、不同意等)的颜色。
我通常很容易在网上找到这些问题的答案,但使用堆叠图表时会遇到一些困难。
这是代码
data_melted <- melt(Data, id.vars = "X")
View(data_melted)
ggplot(data = data_melted)+
geom_bar(mapping = aes(x = X, y = value, fill = variable),position="fill", stat="identity")+
coord_flip()+
scale_y_continuous(limits=c(0, 1))+
theme(
panel.background = element_blank(),
axis.title.x = element_blank(),
legend.position = "bottom") +
scale_fill_grey() + theme_classic()
对于顺序,您应该将列转换为因子并在其中选择顺序。
颜色使用 scale_color_manual
。即scale_color_manual(values = c(Disagree="red",....)
我有这个情节,想:
- 手动 select Y 轴上的问题(例如,会话详细信息等)出现的顺序(即,我希望会话详细信息是第 4 个而不是第 1 个)
- 手动 select 变量在条形图中出现的顺序(例如,我想同意成为第一个,等等)
- 使用十六进制值手动决定每个变量(同意、不同意等)的颜色。
我通常很容易在网上找到这些问题的答案,但使用堆叠图表时会遇到一些困难。
这是代码
data_melted <- melt(Data, id.vars = "X")
View(data_melted)
ggplot(data = data_melted)+
geom_bar(mapping = aes(x = X, y = value, fill = variable),position="fill", stat="identity")+
coord_flip()+
scale_y_continuous(limits=c(0, 1))+
theme(
panel.background = element_blank(),
axis.title.x = element_blank(),
legend.position = "bottom") +
scale_fill_grey() + theme_classic()
对于顺序,您应该将列转换为因子并在其中选择顺序。
颜色使用 scale_color_manual
。即scale_color_manual(values = c(Disagree="red",....)