在ggplot中垂直细分条形图

Question

我正在尝试做4列数据的堆积条形图。

NAME,TYPE,STAGE,VALUE
AAA,typeA,L,25
AAA,typeB,L,25
CCC,NA,L,20
BBB,NA,H,30
AAA,typeA,H,20
AAA,typeB,H,30
CCC,NA,H,20
BBB,NA,H,30
CCC,NA,M,10
DDD,NA,M,70
BBB,NA,M,20

我可以使用以下命令生成堆积条形图：

ggplot(data, aes(x=STAGE, y=VALUE, fill = NAME)) + geom_bar(stat ="identity")

然而，我没有将两个红色矩形堆叠在一起代表第一列中的类型，或者在第二列中有两个红色矩形，我想将一个更大的矩形垂直划分基于“TYPE”列。像下面这样的东西（不按比例！）： ggplot可以吗？