ggplot sec。轴，具有不同的零点

Question

我正在尝试绘制2个具有不同y轴的参数。如何更改第二个y轴与第一个y轴具有相同的0点？在我的示例中，我想将0点从第二个轴移到绘图的下部。谢谢！

ggplot(datafile, aes(Date))+
  geom_line(aes(y=dat1))+
  geom_col(aes(y=dat2*2),col="green")+
  scale_y_continuous("dat1", sec.axis = sec_axis(~./2, name = "dat2 green"))

<< img src =“ https://image.soinside.com/eyJ1cmwiOiAiaHR0cHM6Ly9pLnN0YWNrLmltZ3VyLmNvbS90cW5FZi5wbmcifQ==” alt =“在此处输入图像描述”>

如何上传简单的数据集？

Answer 1

我希望这会有所帮助？！

structure（list（Date = structure（c（1420070400，1420081200，1420092000，1420102800、1420113600、1420124400、1420135200、1420146000、1420156800，1420167600、1420178400、1420189200、1420200000、1420210800、1420221600，1420232400、1420243200、1420254000、1420264800、1420275600、1420286400，1420297200、1420308000、1420318800、1420329600、1420340400、1420351200，1420362000、1420372800、1420383600、1420394400、1420405200、1420416000，1420426800、1420437600、1420448400、1420459200、1420470000、1420480800，1420491600、1420502400、1420513200、1420524000、1420534800、1420545600，1420556400、1420567200、1420578000、1420588800、1420599600、1420610400，1420621200、1420632000、1420642800、1420653600、1420664400、1420675200，1420686000、1420696800、1420707600、1420718400、1420729200、1420740000，1420750800、1420761600、1420772400、1420783200、1420794000、1420804800，1420815600、1420826400、1420837200、1420848000、1420858800、1420869600，1420880400、1420891200、1420902000、1420912800、1420923600、1420934400，1420945200、1420956000、1420966800、1420977600、1420988400、1420999200，1421010000、1421020800、1421031600、1421042400、1421053200、1421064000，1421074800、1421085600、1421096400、1421107200、1421118000、1421128800，1421139600），类= c（“ POSIXct”，“ POSIXt”），tzone =“ UTC”），dat1 = c（-23.4，-23.8，-24.2，-23.7，-23.2，-24.2，-23.9，-23.9，-24.1，-23.6，-23.9，-21.8，-20.2，-19.3，-19.3，-19.2，-18.6，-18.6，-19.4，-19.7，-17.7，-15.7，-14.3，-14.5，-13.6，-17.6，-20，-21，-22.5，-22.4，-24.6，-22.9，-22.8，-22.4，-21.2，-22.6，-21.1，-20.9，-18.9，-18.4，-15.7，-15.2，-14.6，-13.9，-13.3，-10.6，-10.9，-8.1，-5.4，-4.8，-5.3，-6.1，-5.2，-5，-3.9，-3.6，-4.6，-5.5，-7.3，-11，-14.7，-16.1，-19.1，-21.6，-24.9，-26.3，-26.6，-26.7，-24.3，-23，-21.9，-22，-25.6，-25.9，-25.5，-26.4，-27.6，-30，-29.7，-29.1，-29，-29.2，-30.9，-30.3，-30.2，-30.1，-29.5，-29.5，-28.7，-28.6，-29.9，-30.1，-28.8，-27.6，-26.1，-25.5，-25.7，-25.3，-24.7，-24.2），dat2 = c（0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，2，0，0，0，3，0，0，0、0、0、0、0、0.3、0、0、0、0、0、0、0、0、0、0、0、0、0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，2，0，0，0，0，0、0、0、0、0、0、0、0、0、0、0、0、0、0、0、0、0、0，0.2，0，0，0，0.2，0，0，0，0，0，0，0，0）），.Names = c（“ Date”，“ dat1”，“ dat2”），row.names = c（NA，100L），class =“ data.frame”）

Answer 2

我找到了一个解决方案：ggplot with 2 y axes on each side and different scales->参见气候图的说明