二次Y軸を複製してカスタマイズする

Question

これは簡単ですが、いくつかのエラーが発生しています。セカンダリのy軸のラベルを複製してカスタマイズする必要があります。

まず、この単純なコードは、次の図得られるはず：

ggplot(data = mpg, aes(x = displ, y = hwy)) + 
     geom_point() + 
     scale_x_continuous(sec.axis = dup_axis()) + 
     scale_y_continuous(sec.axis = dup_axis()) 

をしかし、私は次のエラーを取得する理由を私は知らない（それはscale_引数なしで動作し、私はggplot2を持っていますバージョン2.2.1）：

Error in .Call(rhs, f) : first argument must be a string (of length 1) or native symbol reference

第二に、y軸が複製されると私右側に、（ "a"、 "b"、 "c"）と言うように、目盛りラベル（20,30,40）を変更したいと思います。

エラーを修正し、セカンダリy軸の目盛りラベルをカスタマイズするにはどうすればよいですか？

Answer 1

ggplot2（2.2.1）の同じバージョンで、コードの最初の部分がうまく動作します。あなたの2番目の質問に関連して、sec_axis()を使用して仕事をします。

ggplot(data = mpg, aes(x = displ, y = hwy)) + 
    geom_point() + 
    scale_x_continuous(sec.axis = dup_axis()) + 
    scale_y_continuous(sec.axis = sec_axis(~ . * 1, breaks = c(20,30,40), labels = c("a","b","c"))) 

注：あなたが~ . * 1などを使用するのと同じスケールを持っていますが、ただのラベルを変更したいので、最初の引数は、変換式transであることに気付いて二軸の」形質転換式でなければなりません "。