使用 ggh4x 包中的 help_secondary 函数时,是否可以添加点和更改两个y轴的名称?例如,让我们考虑在 help_secondary 函数的手册www.example.com中提供的示例https://teunbrand.github.io/ggh4x/reference/help_secondary.html#examples在 economics 数据集的示例中,如何添加点沿着线并更改两个y轴的名称?
e3bfsja21#
要沿着线添加点,请添加geom_point层。要设置轴标题,您可以使用name参数:
geom_point
name
library(ggplot2) library(ggh4x) sec <- help_secondary(economics, primary = unemploy, secondary = psavert, name = "Secondary" ) p <- ggplot(economics, aes(date)) + geom_line(aes(y = unemploy), colour = "blue") + geom_point(aes(y = unemploy), colour = "blue") p <- p + geom_line(aes(y = sec$proj(psavert)), colour = "red") + geom_point(aes(y = sec$proj(psavert)), colour = "red") p + scale_y_continuous(name = "Primary", sec.axis = sec)
1条答案
按热度按时间e3bfsja21#
要沿着线添加点,请添加
geom_point
层。要设置轴标题,您可以使用name
参数: