参见：https://mattzou.com/2019/11/23/ggplot2-Dual-Axis/

    最近画出这样一幅图：

    31. 双坐标轴的实现方案 - 图1

    但不难发现，两张图其实是一样的！

    因为所谓的比例，其实也就是counts 数在整体中的比例再乘以一百。

    操作起来其实也非常的简单。

    代码如下：

    1. (p1_n <- p1_n + scale_y_continuous(
    2.     expand=c(0,0),
    3.     sec.axis = sec_axis(~ .*100/sum(mut_df_96_2$Counts), name = "Proportion"))
    4.   ) + theme(axis.title.y.right = element_text(angle = 90,
    5.                                               hjust = 0.5))

    31. 双坐标轴的实现方案 - 图2

    需要注意的是，ggplot 仅仅提供了对原本坐标系进行统计转换后形成的第二个坐标轴的方法。因为作者认为双坐标轴并不是一个非常好的展示数据的方法，而且有时候甚至会混淆视听！