Plotly中的子图的标题

Question

我想在Plotly中制作3x3子图的网格。我试图为每个副歌和顶部的主要标题获得标题，但似乎无法使其起作用。 我看到这个wonderful site为Python，但我似乎无法找到它的等效R.

all <- subplot(graph1, graph2, graph3, graph4, graph5, graph6, 
graph7, graph8, graph9, nrows = 3) 

这给了我想要的电网，但没有我想的次要情节的标题：

1. Graph 1 
2. Graph 2 
3. Graph 3 
4. Graph 4 
5. Graph 5 
6. Graph 6 
7. Graph 7 
8. Graph 8 
9. Graph 9 

和默认主标题是图9.

任何人都可以协助吗？

Answer 1

你可以使用ggplot + plotly来实现它。这确实的伎俩：

library(ggplot2) 
library(plotly) 

mtcars$main1 = "title1" 
mtcars$main2 = "title2" 

p1 = ggplot(mtcars, aes(x = mpg, y = cyl)) + geom_point() + facet_wrap(~main1) 
p2 = ggplot(mtcars, aes(x = disp, y = hp)) + geom_point() + facet_wrap(~main2) 

plotly::subplot(p1, p2 ,nrows = 1, margin = 0.23) %>% layout(title ="Main title")