Secondary / Dual axis - ggplot

Question

I am opening this question for three reasons : First, to re-open the dual-axis discussion with ggplot. Second, to ask if there is a non-torturing generic approach to do that

Answer 1

In response to #1

We've all stumbled across one of those plots where we need to use a ruler on the screen, because the axis is too far

cowplot.

# Assign your original plot to some variable, `gpv` <- ggplot( ... )
ggdraw(switch_axis_position(gpv, axis="y", keep="y"))