我正在尝试使用以下函数绘制密度。然而它并没有达到我想要的外观......我想知道是否有办法让情节的左右边缘平滑到基线(这样它就不再有方形边缘了左右。)
fig1<-ggplot(data=mtcars, aes(x=mpg, fill=as.factor(am))) +
geom_density(aes(y=..density..), poisition = "identity", color = "black", alpha = 0.5) +
geom_rug(aes(colour = as.factor(am))) +
scale_x_continuous() +
labs(fill = "Transmission", colour = "Transmission")
fig1