如题，想要在一幅图上画出两条不同的密度曲线图(图在下方)，不知道如何实现，如果有知道的请帮个忙，谢谢！！！
从谢老大的书上看到由直方图到密度图的作法，但没有两条画在一起的。以下为谢老大书上的代码，供大家参考，希望大家可以帮个忙，谢谢~~
>hist(geyser$waiting, freq = FALSE, xlab = "waiting",
+ main = "(2) freq = FALSE")
>hist(geyser$waiting, probability = TRUE, main = '')
>lines(density(geyser[['waiting']]))

另外，还有个命令和谢老大的有异曲同工之处，一并贴出来吧（转用的）：
>x=rnorm(1000)
>hist(x,prob=T,main="histogram with fitted density curve,bw=0.5")
>lines(density(x,bw=0.5),col="red",lwd=2)