ggplot绘图遇到的问题

zx040431

b<-ggplot(mpg,aes(x=hwy))
b+geom_histogram(aes(fill=factor(year),y=..density..),col="black")+facet_wrap(~year,ncol=1)+stat_density(geom = "line",size=1.5,position = "identity",aes(col=factor(year)))
其中y=..density..的四点是什么意思，而且去掉就会出错，求大神解答{:soso_e100:}