plotly多個繪圖方面

Question

我想要做的多地塊以2軸每個情節是這樣

library(plotly) 
ay <- list(
    tickfont = list(color = "green"), 
    overlaying = "y", 
    side = "right", title = "y2 axis title" 
) 


par(mfrow=c(2,1)) 
ax <-list(title = "x axis title") 
ay1 <-list(title = "y1 axds title") 
plot_ly(x = 1:3, y = 10*(1:3), name = "slope of 10") %>% 
    add_trace(x = 2:4, y = 1:3, name = "slope of 1", yaxis = "y2") %>% 
    layout(title = "Double Y Axis", yaxis2 = ay, xaxis = ax, yaxis = ay1) 


ax <-list(title = "x axis title") 
ay1 <-list(title = "y1 axds title") 
plot_ly(x = 1:3, y = 10*(1:3), name = "slope of 10") %>% 
    add_trace(x = 2:4, y = 1:3, name = "slope of 1", yaxis = "y2") %>% 
    layout(title = "Double Y Axis", yaxis2 = ay, xaxis = ax, yaxis = ay1) 

但是當你運行代碼，你仍然只看到一個情節。可以積極做多極？它可以做2軸切面嗎？

Answer 1

您正在尋找subplot。檢查此page更多

library(plotly) 
ay <- list(
    tickfont = list(color = "green"), 
    overlaying = "y", 
    side = "right", title = "y2 axis title" 
) 

ax <-list(title = "x axis title") 
ay1 <-list(title = "y1 axds title") 

subplot(
     plot_ly(x = 1:3, y = 10*(1:3), name = "slope of 10") %>% 
      add_trace(x = 2:4, y = 1:3, name = "slope of 1", yaxis = "y2") %>% 
      layout(title = "Double Y Axis", yaxis2 = ay, xaxis = ax, yaxis = ay1), 
     plot_ly(x = 1:3, y = 10*(1:3), name = "slope of 10") %>% 
      add_trace(x = 2:4, y = 1:3, name = "slope of 1", yaxis = "y2") %>% 
      layout(title = "Double Y Axis", yaxis2 = ay, xaxis = ax, yaxis = ay1), nrows = 2) 

輸出