小编jlp*_*jlp的帖子

这应该很简单，但我遇到了一些错误。我想复制然后自定义辅助 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 轴在右侧复制，我想更改刻度标签（20、30、40），例如（“a”、“b”、“c”）。

如何修复该错误并自定义辅助 y 轴的刻度标签？

我正在从Mathematica切换到R,但我发现可视化有些困难.

我正在尝试按如下方式进行热图:

short 
   penetration scc          pi0
1            0   0  0.002545268
2            5   0 -0.408621176
3           10   0 -0.929432006
4           15   0 -1.121309680
5           20   0 -1.587298317
6           25   0 -2.957853131
7           30   0 -5.123329738
8            0  50  1.199748327
9            5  50  0.788581883
10          10  50  0.267771053
11          15  50  0.075893379
12          20  50 -0.390095258
13          25  50 -1.760650073
14          30  50 -3.926126679
15           0 100  2.396951386
16           5 100  1.985784941
17          10 100  1.464974112
18          15 100  1.273096438
19          20 …