R-plotly多条线同时使用多个y轴打印面临的问题

R-plotly多条线同时使用多个y轴打印面临的问题,r,plotly,r-plotly,R,Plotly,R Plotly,下面共享的代码应该有三行,其中前两行在第一个Y轴上引用,第三行在绘图右侧的第二个Y轴上引用。 然而,有些地方出了问题 df = data.frame(AS_OF=as.Date(c("2006-10-31", "2006-11-30", "2006-12-29", "2007-01-31", "2007-02-28", "2007-03-30")),

下面共享的代码应该有三行,其中前两行在第一个Y轴上引用,第三行在绘图右侧的第二个Y轴上引用。 然而,有些地方出了问题

df = data.frame(AS_OF=as.Date(c("2006-10-31", "2006-11-30", "2006-12-29", "2007-01-31", "2007-02-28", "2007-03-30")), 
                VALUE1=c(62.790, 63.890, 60.160, 70.425, 67.675, 71.175), 
                VALUE2=c(62.79000, 63.34000, 62.28000, 64.31625, 64.98800, 66.01917), 
                VALUE3=c(0.000,  1.100, -2.630,  7.635,  4.885,  8.385)
)

plt <- plot_ly()

plt <- plt %>% add_lines(data=df
                         , x = df[['AS_OF']]
                         , y = df[['VALUE1']]
                         , type='scatter'
                         , mode = 'lines+markers'
                         , name='VALUE1'
                         , inherit = F
)

plt <- plt %>% add_lines(data=df
                         , x = df[['AS_OF']]
                         , y = df[['VALUE2']]
                         , type='scatter'
                         , mode = 'lines+markers'
                         , name='VALUE2'
                         , inherit = F
)


plt <- plt %>% add_lines(data=df
                         , x = df[['AS_OF']]
                         , y = df[['VALUE3']]
                         , type='scatter'
                         , mode = 'lines+markers'
                         , inherit = F
                         , name='VALUE3'
                         , yaxis= 'y2'
)

plt <- plt %>% layout(yaxis2 = list(overlaying = "y"
                                    , side = "right"
                                    , title = 'second_y_axis'
)
) 
plt
df=data.frame(AS_OF=AS.Date(c)(“2006-10-31”、“2006-11-30”、“2006-12-29”、“2007-01-31”、“2007-02-28”、“2007-03-30”),
值1=c(62.790,63.890,60.160,70.425,67.675,71.175),
值2=c(62.79000、63.34000、62.28000、64.31625、64.98800、66.01917),
值3=c(0.000,1.100,-2.630,7.635,4.885,8.385)
)

plt您的代码运行良好。痕迹没有丢失。它只是隐藏起来了,因为它和其他痕迹走的是同一条路线。我清理了您的代码并更改了示例数据,使其可见:

library(plotly)

df = data.frame(
  AS_OF = as.Date(c("2006-10-31", "2006-11-30", "2006-12-29", "2007-01-31", "2007-02-28", "2007-03-30")),
  VALUE1 = c(62.790, 63.890, 60.160, 70.425, 67.675, 71.175),
  VALUE2 = c(62.79000, 63.34000, 62.28000, 64.31625, 64.98800, 66.01917),
  VALUE3 = c(0.000,  5.100,-4.630,  0.635,  4.885,  -2)
)

plt <- plot_ly(data = df, type = 'scatter', mode = 'lines+markers')

plt <- plt %>% add_lines(
  x = ~ AS_OF,
  y = ~ VALUE1,
  name = 'VALUE1'
)

plt <- plt %>% add_lines(
  x = ~ AS_OF,
  y = ~ VALUE2,
  name = 'VALUE2'
)

plt <- plt %>% add_lines(
  x = ~ AS_OF,
  y = ~ VALUE3,
  name = 'VALUE3',
  yaxis = 'y2'
)

plt <- plt %>% layout(yaxis2 = list(
  overlaying = "y",
  side = "right",
  title = 'second_y_axis'
))

plt
library(plotly)
df=data.frame(
截至日期(c(“2006-10-31”、“2006-11-30”、“2006-12-29”、“2007-01-31”、“2007-02-28”、“2007-03-30”)),
值1=c(62.790,63.890,60.160,70.425,67.675,71.175),
值2=c(62.79000、63.34000、62.28000、64.31625、64.98800、66.01917),
值3=c(0.000,5.100,-4.630,0.635,4.885,-2)
)

谢谢你的回答。我复制并粘贴了您的解决方案,但仍然没有显示VALUE1行。我的plotly库的版本为“4.9.0”。我遗漏了什么吗?我使用了最新的CRAN版本v4.9.3。也许更新会有帮助吗?我目前一直在使用这个版本,因为我必须使用服务器上可用的库,而且这些库可能需要几周的时间才能得到更新的批准。你认为我面临的问题是旧版本的错误吗?不,我不这么认为。这是非常基本的绘图代码。