ggplot2と拡張ライブラリの組み合わせ

Question

基本的なgeom_ *レイヤーとサードパーティライブラリの「stat」プロパティを組み合わせることはできますか？また、ggplot stat_ *のレイヤーは別のライブラリからのgeomを使用しています。私はggrepelパッケージから第三者「geom_text_repel」と「テキスト」GEOMを置き換えたい。この例では

require(ggrepel)  
Plot1<- ggplot(data=mpg, aes(x=cty, y=hwy)) + 
    geom_point()+ 
    stat_sum(aes(label=..n..), alpha=.5, colour=c("red"), size=3, geom="text") 

：

は、私は簡単な例を持っています。私は=「text_repelを」GEOMするプロパティのgeom =「テキスト」を変更する場合には、エラーメッセージが表示されます。

Error: Found object is not a geom.

同様のエラーは、私がggplot2 geom_第三者スタットを使用したい場合*層に表示されます。

このエラーを解決するにはどうすればよいですか？

Answer 1

このコードは私のR 3.4.1（ggplot2_2.2.1.9000とggrepel_0.6.5）上で動作します：

library(ggplot2) 
library(ggrepel)  
Plot1 <- ggplot(data=mpg, aes(x=cty, y=hwy)) + 
    geom_point() + 
    stat_sum(aes(label=..n..), alpha=.5, colour=c("red"), size=3, geom="text_repel") 
Plot1