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..))