r语言画这样的堆叠直方图

就是同一个矩形内可能有多个不同分组的数据,用不同的颜色表示。不使用ggplot函数的话该怎么画,我尝试用hist分别画出来几个不同分组的数据,但不能把其中一个堆到另一个上面去

img