x値の複数のポイント

Question

私は添付のようなプロットで私のデータをプロットしたいと思います。問題を解決して各DBに3ポイントを持たせることはできません。基本的には重複しているので、少し見やすく移動したいと思います。私はいくつかのグループを使用することを考えていましたか？これは私のデータの一部です。各DBの早期/中期/後期のためにmembr_percが増減する様子を見て、そのタイプのベースを比較したいと思います。

 type name para length DB replicate membr_perc 
    <fctr> <chr> <chr> <int> <int>  <chr>  <dbl> 
1  wt PC [32:1]  32  1  early 0.2927746 
2  shc PC [32:1]  32  1  early 0.3506922 
3  wt PC [32:1]  32  1  early 0.2258272 
4  shc PC [32:1]  32  1  early 0.3523230 
5  wt PC [32:1]  32  1  early 0.2654483 
6  shc PC [32:1]  32  1  early 0.3658814 
7  shc PC [34:1]  34  1  mid 0.7681123 
8  shc PC [34:1]  34  1  mid 0.7677175 
9  shc PC [34:1]  34  1  mid 0.7474835 
10  wt PC [34:1]  34  1  late 0.3050501 
11  wt PC [34:1]  34  1  late 0.3215530 
12  wt PC [34:1]  34  1  late 0.3123021 

これは私が使用する式である：

ggplot(early_pc, aes(x = DB, y= membr_perc, col=type, shape = replicate, 
        group=interaction(type, replicate))) + geom_point() 

希望のプロットのスケッチ：

Answer 1

おそらくのようなもの：

early_pc$replicate <- factor(early_pc$replicate, c('early', 'mid', 'late')) 

ggplot(early_pc, aes(x = replicate, y = membr_perc, fill = type)) + 
    geom_jitter(size = 3, shape = 21, width = 0.2, alpha = 0.7) + 
    facet_grid(~DB) 

が得られます。