R 使用多条线打印线批注

问题：基本上，我想为

mpg

（第一行）和

disp

（第二行）的绘图中的每一行注释y值

我如何扩展下面的玩具示例代码来实现这一点？2x

add_text（）

图层不工作

非常感谢

plot_ly(mtcars, 
        x = ~wt) %>% 
  add_lines(y = ~mpg,
            text = ~mpg) %>%
  add_text() %>%
  add_lines(y = ~disp,
            text = ~disp) %>%
  add_text()

---

由于每次添加都继承自原始的

plot\u ly

调用，因此需要为每次调用

add\u text

指定

y

和

text

值。据我所知，它们不会继承前面调用

add\u lines

的

y

或

text

值

plot\u ly（mtcars、，
x=~wt）%>%
添加_行（y=~mpg）%>%
添加_文本（y=~mpg，
text=~mpg）%>%
添加_行（y=~disp）%>%
添加_文本（y=~disp，
text=~disp）