小编Mat*_*ndi的帖子

我想制作一个堆叠条形图，说明按研究类别为每个项目（X 轴）请求和完成了多少研究（Y 轴）。每个项目将有两个堆叠的条形图，一个用于请求的研究，一个用于已完成的研究。

这是我用于数据的示例：

我可以将它分成一组用于要求的研究和一组用于完成的数据，我想出了这个（忽略可笑的颜色和标题）：

这是我使用的代码：

data<-read.csv("table56req.csv")
data
library(ggplot2)
ggplot(data=data, aes(x=proj, y=req, fill=cat)) +
  geom_bar(stat="identity", position="stack") + 
  labs(title="Type of Study by Project", x="Project", y="Number of Studies") + 
  theme(plot.title = element_text(size=30,hjust = 0.5)) + 
  theme(panel.background = element_rect(fill = 'white')) + 
  theme(axis.line = element_line(color="black", size = 0.5)) + 
  theme(axis.text.x= element_text(size=10,color = "black")) + 
  theme(axis.text.y = element_text(size=12, color = "black")) + 
  scale_y_continuous(breaks=seq(0,20,5)) + 
  scale_x_discrete(labels=c("Bowersock","Dorena","Holtwood","Jackson","Milford","Nisqually","Smoky Mtn")) + 
  theme(axis.title.x = element_text(face="bold", size=12,vjust=-0.5,hjust=0.5)) + 
  theme(axis.title.y = element_text(face="bold", size=12,vjust=2,hjust=.5)) + 
  scale_fill_discrete(name = "Categories", labels = c("Biota and …