使用因子水平顯示R Scatter圖中的觀測數

Question

我的數據框d

str(d)
'data.frame':   10821 obs. of  2 variables:
 $ Actual : Factor w/ 10 levels "SA103","SA111",..: 6 6 6 6 9 9 6 9 6 6 ...
 $ Planned: Factor w/ 17 levels "SA103","SA111",..: 1 6 6 6 1 9 6 9 6 6 ...

我正在使用ggplot2和以下代碼進行繪圖

ggplot(d, aes(x=Actual, y=Planned))   + geom_point()

我想在每個點顯示觀察次數，以便輕松識別計划和實際水平之間偏差的大小。 （例如：如果顯示SA121（計划）移至SA103（實際）~1000次，那么這是一個嚴重的問題。

如何將數據標簽放在這種類型的圖中，數據標簽顯示觀察次數（對於給定的x，y條件）？

Answer 1

如果你真的需要在每個點看到obs的數量，你可以創建自己的函數來提取N，然后在ggplot中的stat_summary中調用該函數：

library(ggplot2)
Actual <- sample( LETTERS[1:10], 5000, replace=TRUE, prob=c(rep(0.25, 10)))
Planned <- sample( LETTERS[1:17], 5000, replace=TRUE, prob=c(rep(0.25, 17) ))
d <-as.data.frame(cbind(Actual, Planned))

N <- function(x){
  return(data.frame(y = mean(x), label = length(x)))
 }

  ggplot(d, aes(x=Actual, y=Planned))   +stat_summary(fun.data = N, geom =  "text")

或者，您可以使用geom_count（）根據觀察次數調整點的大小。

ggplot(df, aes(x=Actual, y=Planned))  + geom_point() + geom_count()