R plotly:：ggplotly图例标题不以刻面ggplot为中心

我正在尝试将ggplot转换为R Markdown HTML演示的交互式绘图

如果“a”是我的ggplot，那么重要的代码如下所示：

x <- list(title = "Title 1")

y <- list(title = "Title 2")

plotly::ggplotly(a + ylab(" ") + xlab(" ")) %>% plotly::layout(xaxis = x, yaxis = y)

---

x您能否提供一个可重现的示例来说明问题？“当应用ggplotly时，我在ggplot中提供的轴标题消失/重叠。”我无法复制它；提供了示例。是否直接使用plotly将图形（使用
子地块
）作为选项？或者您必须执行
ggplotly（）
转换？您能否提供一个可重现的示例来说明问题？“当应用ggplotly时，我在ggplot中提供的轴标题消失/重叠。”我无法复制它；提供了示例。是否直接使用plotly将图形（使用
子地块
）作为选项？或者您必须执行
ggplotly（）
转换？
# This is an example ggplot
a <- ggplot(mtcars) + aes(hp, drat) + geom_point() + facet_wrap(~carb) + ylab(label = expression(X ~ (g ~ kg ^ {-1})))

# Apply ggplotly
plotly::ggplotly(a)
# You will see that the y label dissapears and overlaps the axis labels (first pic).

# Use the solution I found
x <- list(title = "Xlab")

y <- list(title = "Ylab"))

plotly::ggplotly(a + ylab(" ") + xlab(" ")) %>% plotly::layout(xaxis = x, yaxis = y)

# You'll see the result that I'm talking about (second pic).