r - 密度图显示点之间的条纹（R ggplot2）

Question

嗨，当只有几个点时，我的密度图会显示点之间的条纹/凹陷，请参见这张图片：

http://www.imagesup.net/?di=3141413124212

# show fringes    
test = as.data.frame( sample(0:5,1000,replace=T) ) 
colnames(test) = c('mon')
ggplot(test, aes(x=mon)) + geom_density(binwidth=1, size=1)

# normal
test = as.data.frame( sample(0:20,1000,replace=T) ) 
colnames(test) = c('mon')
ggplot(test, aes(x=mon)) + geom_density(binwidth=1, size=1)

有人知道如何解决吗？

Answer 1

尝试更改adjust=参数以更改用于估计密度的带宽：ggplot(test, aes(x=mon)) + geom_density(binwidth=1, size=1, adjust=2)。正如?stat_density帮助页面建议的那样，查看密度的参数