将分类的列条目绘制为单独的堆叠条形图中的总和

Question

我想本质上重新创建我在JMP中使用R绘制的图。这些值来自定性数据集，其中物种组是单个列中的条目。我想在x轴上绘制SpeciesGroup，但在堆积栏中以强度填充颜色。我想我需要对数据重新排序，但无法完全弄清楚。

df<- data.frame(ID=c(1,2),
                policy=c("Policy A", "Policy B", "Policy C", "Policy D", 
                         "Policy E","Policy F" ),
                SpeciesGroup= c("ray", "ray", "mammal", "mammal", "fish", "reptile"),
                Stength=c("M", "V", "M", "P", "P", "M"),
                stringsAsFactors=FALSE)

下面是我在JMP中制作的图形，我想复制它：

感谢您提供的任何帮助！

Answer 1

是您要找的东西吗？

library(ggplot2)
ggplot(df, aes(x = SpeciesGroup, fill =  Stength))+
  geom_bar(stat = "count")