ggplot改变条形图的颜色

Question

我遇到了这个使用ggplot的R脚本：

SELECT COUNT(*) FROM t_patients WHERE bed_available=true;

这就是我一直在寻找的东西。但是，我不能：

1. 更改默认颜色（例如，我尝试使用“RdYlGn” 调色板）

2. 将原始值转换为频率。

   有任何建议吗？

Answer 1

你可以试试这个：

library(reshape2)
library(dplyr)
library(ggplot2)

库（GGPLOT2）

dat%>%
  melt(id.vars = "row",variable.name = "grp")%>%
  group_by(grp)%>%
  mutate(tot=sum(value), fq=value/tot)%>%
  ggplot(aes(x=grp,y=fq,fill=row,label = sprintf("%.2f%%", fq*100)))+
  geom_bar(stat = "identity")+
  geom_text(size = 3, position = position_stack(vjust = 0.5))+
  xlab("\nType") +
  ylab("Time\n") +
  guides(fill=FALSE) +
  scale_fill_distiller(palette = "RdYlGn")+
  theme_bw()