我想使用ggplot绘制辅助轴的图形,我将原始数据乘以200000 ^ [整个列],这是什么逆向?
scale_y_continuous(sec.axis = sec_axis(~. ) )
使用Nico的数学,这是一个使用反函数的工作示例:
set.seed(2)
z <- data.frame(x=1:100, y=200000^runif(100, 10, 11))
ggplot(z, aes(x, y)) +
geom_point() +
scale_y_continuous(
sec.axis = sec_axis(~ log(.) / log(200000), breaks=c(10.1,10.9, 10.95)),
expand = c(0,0)
)
我必须使用它,expand=c(0,0)
因为即使数据中没有负值,轴的扩展(对于上下文和剪切来说也很常见)会导致负值。这些负面因素会导致警告,因此,如果您不介意警告,则可以排除警告。(可能有其他方法可以处理这种现象,也许您的数据不需要这些方法。)
编辑:我加了breaks=
。请注意,breaks=
并且labels=
可以使用数字值或函数作为输入来覆盖,因此您无需像此处所做的那样对值进行硬编码。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句