我想在构面网格内创建一个带有分组的堆叠条形图。我的数据如下所示：
| 样本 | 主题 | 分期 | 物种 | 丰富％ |
|---|---|---|---|---|
| 样品1 | 1 | 修补 | 一个 | 100 |
| 样品2 | 1 | 牌匾 | 乙 | 50 |
| 样品2 | 1 | 牌匾 | 一个 | 50 |
| 样品3 | 1 | 无损伤的 | C | 100 |
| 样品4 | 1 | 无损伤的 | 一个 | 100 |
| 样品5 | 2 | 修补 | 一个 | 100 |
| 样品6 | 2 | 修补 | 乙 | 100 |
| 样品7 | 2 | 无损伤的 | C | 100 |
| 样品8 | 2 | 非损伤性 | 一个 | 100 |
我已经使用以下代码使用facet_grid 创建了他的堆叠条形图：
mdf = read.tsv("XXX.tsv")
p = ggplot(mdf, aes_string(x = "Sample", y = "Abundance", fill = "Species")
p = p + geom_bar(stat = "identity", position = "stack", color = "black")
p = p + theme(axis.text.x = element_text(angle = -90, hjust = 0))
p = p + facet_grid(~staging, scales = "free")
p
现在我想将每个样本的条重新组织到 facet_grid 中的相应主题，以获得更好的概览。例如，使用上面的示例，样本 3 和样本 4 属于受试者 1，应将样本 7 和样本 8 归为同一方面的受试者 2 中的“非病变”方面。
我尝试了几次，但没有弄清楚如何实现这一点。