密度图显示点之间的条纹（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帮助页面所示，请查看参数density