在R中将拟合曲线放在顶部

Question

我有这段代码：

ggplot(f, aes(x=rev)) + 
geom_histogram(binwidth = 0.5, position= position_dodge(0.5), 
               color="black", fill="cadetblue4") + 
  ggtitle("Histogram of Maximum Revenue")+labs( x="Revenue", y="Number of Observations")

我尝试添加+ geom_density()，但它显示的图表与没有geom_density（）的图表相同。它什么都不做。它不会抛出错误信息..

Answer 1

由于尺度不同，可能难以看到密度图。试试这个：

ggplot(f, aes(x=rev)) + 
  geom_histogram(aes(y = ..density..),
                 binwidth = 0.5, position= position_dodge(0.5), 
                 color="black", fill="cadetblue4") + 
  ggtitle("Histogram of Maximum Revenue")+labs( x="Revenue", y="Number of Observations") +
  geom_density()

如果您希望y轴在计数范围内：请参阅this discussion中的最后一个代码示例。