R带plot.ly的公共轴子地块

R带plot.ly的公共轴子地块,r,plotly,R,Plotly,我正在尝试使用plot.lyR库中的子图进行交互式在线制图。我可以成功地创建一个子图,但是我很难只拥有一个y轴,这是两个图表的共同点 plot.ly网站确实为公共x轴提供了一个示例,但是使用和附加的trace而不是plot\u ly()函数中提供的组选项来实现这一点略有不同 示例代码: library(data.table) library(plotly) dt <- data.table(x = c("A","B","C","D","A","B","C","D"),

我正在尝试使用
plot.ly
R库中的子图进行交互式在线制图。我可以成功地创建一个子图,但是我很难只拥有一个y轴,这是两个图表的共同点

plot.ly
网站确实为公共x轴提供了一个示例,但是使用和附加的
trace
而不是
plot\u ly()
函数中提供的
选项来实现这一点略有不同

示例代码:

library(data.table)
library(plotly)
dt <- data.table(x = c("A","B","C","D","A","B","C","D"),
                 y = c(12,4,3,9,5,10,3,7),
                 group = factor(c(rep("G1",4),rep("G2",4))))
dt$id <- as.integer(dt$group)
xx <- xaxis_standard
yy <- yaxis_standard
p <- plot_ly(dt, x=x, y=y, group = group, xaxis = paste0("x",id)) 
p <- layout(p, yaxis = list(range = c(0, max(y))))
p <- subplot(p, margin = 0.05) 
p <- layout(p,showlegend = F, yaxis = list(anchor = 'x1'))
p
库(data.table)
图书馆(绘本)

dt子图位于标有
xaxis2
yaxis2
等的单独轴上。这些轴也是
layout()
的参数

p
p <- layout(p, showlegend = F, yaxis = list(anchor = 'x1'), 
            yaxis2 = list(showticklabels = F))
p