Question

所以我在以下两个df中使用化学和降水数据：

    chem_df
    rain_df

我使用ggplot（）绘制了两个数据集，为了获得2个轴，使用了scale_y_continuous的sex.axis函数，如下所示：

    chem_rain_fig <- ggplot() +
    geom_point(data = chem_df, aes(x = Date, y = Temp)) +
    geom_line(data = rain_df, aes(x = Date, y = Rain)) + 
    scale_y_continuous(name = "Temp", sec.axis = (.~*, name = "Rain"))

但是它一直将两个数据集绘制到原始y轴上，如下所示： Graph with Issue 我想指出一下，降雨数据在0-10厘米之间，这就是为什么它沿第一轴而不是第二轴以limit（0,10）

Answer 1

This might answer your question

从本质上讲，您必须手动转换数据并进行缩放以使其显示正确的大小。不能没有样本数据就尝试，但这应该可行，将其乘以2并除以比例即可：

    chem_rain_fig <- ggplot() +
    geom_point(data = chem_df, aes(x = Date, y = Temp)) +
    geom_line(data = rain_df, aes(x = Date, y = Rain*2)) + 
    scale_y_continuous(name = "Temp", sec.axis = sec_axis(~./2, name = "Rain"))

尝试绘制具有两个轴的两个不同数据集的数据

1 个答案: