我有一个包含不同变量和不同单位的时间序列，我想在同一个绘图上显示它们。
ggplot 不支持多轴（正如这里所解释的 https://stackoverflow.com/questions/3099219/plot-with-2-y-axes-one-y-axis-on-the-left-and-another-y-axis-on-the-right），所以我听从了建议并尝试用小平面绘制曲线：
x <- seq(0, 10, by = 0.1)
y1 <- sin(x)
y2 <- sin(x + pi/4)
y3 <- cos(x)
my.df <- data.frame(time = x, currentA = y1, currentB = y2, voltage = y3)
my.df <- melt(my.df, id.vars = "time")
my.df$Unit <- as.factor(rep(c("A", "A", "V"), each = length(x)))
ggplot(my.df, aes(x = time, y = value)) + geom_line(aes(color = variable)) + facet_wrap(~Unit, scales = "free_y", nrow = 2)
Here is the result:
问题是只有一个 y 标签，表示“值”，我想要两个：一个带有“电流 (A)”，另一个带有“电压 (V)”。
这可能吗？
In ggplot2_2.2.1您可以使用以下命令将面板条移动为 y 轴标签strip.position论证中facet_wrap。使用此方法，您不会同时拥有条带标签和不同的 y 轴标签，但这可能并不理想。
将条带标签放置在 y 轴（“左”）上后，您可以通过给定一个命名向量来更改标签labeller用作查找表。
条带标签可以通过以下方式移到 y 轴之外strip.placement in theme.
删除条形背景和 y 轴标签，以获得具有两个窗格和不同 y 轴标签的最终图形。
ggplot(my.df, aes(x = time, y = value) ) +
geom_line( aes(color = variable) ) +
facet_wrap(~Unit, scales = "free_y", nrow = 2,
strip.position = "left",
labeller = as_labeller(c(A = "Currents (A)", V = "Voltage (V)") ) ) +
ylab(NULL) +
theme(strip.background = element_blank(),
strip.placement = "outside")
Removing the strip from the top makes the two panes pretty close together. To change the spacing you can add, e.g., panel.margin = unit(1, "lines") to theme.