使用 Plotly 子图向每个 y 轴添加标题

Lik*_*iky 1 r plotly

让我们考虑以下情节:

p1 <- plot_ly(
  x = c("giraffes", "orangutans", "monkeys"),
  y = c(20, 14, 23),
  name = "Size",
  type = "bar")

p2 <- plot_ly(
  x = c("giraffes", "orangutans", "monkeys"),
  y = c(10, 2, 3),
  name = "Weight",
  type = "bar"
)

p <- subplot(p1, p2, nrows = 2, shareX = TRUE)

p %>% layout(yaxis = list(title = "Size"))
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

我想控制每个子图的 y 轴标题。看起来我这样做的方式只能控制顶部的子图。如何为底部子图的 y 轴添加标题?

Car*_*tes 5

titleY = TRUE会产生影响,这样:

p1 <- plot_ly(
  x = c("giraffes", "orangutans", "monkeys"),
  y = c(20, 14, 23),
  name = "Size",
  type = "bar")%>%layout(yaxis = list(title = c("Size1")))

p2 <- plot_ly(
  x = c("giraffes", "orangutans", "monkeys"),
  y = c(10, 2, 3),
  name = "Weight",
  type = "bar"
)%>%layout(yaxis = list(title = c("Size2")))


p <- subplot(p1, p2, nrows = 2, shareX = TRUE, titleY= TRUE) 
p
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述