ggplotで形状を区切りますが、stat_summaryを使用して塗りつぶしをします。

Question

ggplotでstat_summaryを使用して線+点プロットを取得しようとしています。私はグループごとに別々の形をしたいが、白い塗りつぶしと黒い枠線の形をしています。最初に手段のテーブルを作成し、これをgeom_point（）を使用してデータフレームとして使用すると、これは簡単です。しかし、私はstat_summaryでこれを行うことができるようにしたいと思います。

df <- data.frame(day = rep(0:3, times = 12), score = rnorm(48,5,1), group = rep(letters[1:3], each = 4, times = 4)) 

ggplot(df, aes(x = day, y = score)) + 
     stat_summary(fun.y = "mean", geom = "line", aes(linetype = group)) + 
     stat_summary(fun.y = "mean", geom = "point", aes(shape = group), size = 4) 

（白の塗りつぶしを生成しますが、すべての形状が同じになり、黒い境界線がありません）私は手動でscale_shape_manualの値を引数に「白」を入力しようとしたが、それは動作しません。美点の引数としてcolour = groupを 'point' stat_summaryレイヤーに追加すると、色が変わります。

グループごとに異なる形の点を得る方法はありますか？白い塗りつぶしと黒い枠線を使用する方法はありますか？

Answer 1

あなたは試すことができます：

ggplot(df, aes(x = day, y = score)) + 
    stat_summary(fun.y = "mean", geom = "line", aes(linetype = group)) + 
    stat_summary(fun.y = "mean", geom = "point", aes(shape = group), size = 4, col="black", fill="white")+ 
    scale_shape_manual(values = 21:23)