Missing traces when supplying a dual-axis plot to subplot()

If I do:

library(plotly)
ay <- list(
tickfont = list(color = "red"),
overlaying = "y",
side = "right",
title = "second y axis"
)
p <- plot_ly() %>%
add_lines(x = ~1:3, y = ~10*(1:3), name = "slope of 10") %>%
add_lines(x = ~2:4, y = ~1:3, name = "slope of 1", yaxis = "y2") %>%
layout(
title = "Double Y Axis", yaxis2 = ay,
xaxis = list(title="x")
)

It plots both axis.

but if I do:
subplot(p)
I loose the secondary axis.

This doesn't seem like the intended behavior of subplot unless I am missing something. Thanks!

Tái hiện ví dụ R được cung cấp bằng một biểu đồ có hai trục, sau đó truyền nó vào subplot(). Bắt đầu từ điểm vào subplot() và theo dõi cách trục y phụ được xử lý; hoàn tất khi cả hai trace và trục phụ vẫn hiển thị sau khi hợp thành.