在ggplot2 qplot中只有一个观察但是2个点？

Question

我想通过 ggplot2 qplot 中的学科来形象化出版日期。 data$DISCIPLINE是我的因素，包含10个级别。

这就是我的数据：

> head(cbind(data$DATE,data$DISCIPLINE))
     [,1]   [,2]                   
[1,] "2001" "Politikwissenschaften"
[2,] "2006" "Geographie"           
[3,] "1999" "Soziologie"           
[4,] "2013" "Architektur"          
[5,] "2007" "Soziologie"           
[6,] "2004" "Soziologie"      

我按如下方式制作了 qplot ：

require(ggplot2)
MYPLOT <- qplot(data$DATE, data$DISCIPLINE)
MYPLOT + geom_point(aes(size=..count..), stat="bin") + scale_size(range=c(0, 15))

当然我希望不会绘制0个观察值的区域 - 这就是为什么我将范围最小值设置为0.至少，这是有效的。

---

然而奇怪的是，单观察在图中收到两个点。例如，参见水平“Soziologie”，在80年代早期的情节中有2个点，尽管我的数据集中只有一个观察结果< /强>

这是ggplot2中的错误吗？ 我该如何纠正？

Answer 1

这样做你想要的吗？

MYPLOT <- qplot(data$DATE, data$DISCIPLINE)
MYPLOT + geom_point() + stat_sum(aes(size = ..n..))