在R中作图：用list（）对象的数据馈送add_trace

Question

我有已经存储在列表对象中的数据。 我有几条线可以画一条线。 我想使用plotly进行绘制，而无需将数据转换为数据帧。 在下面的代码中，第一行可以很好地绘制，但其他行则不能使用add_trace（）进行绘制：

library(plotly)
d1 = list(x=c(1,2,3,4),y=c(1,2,3,4))
d2 = list(x=c(1,2,3,4),y=c(1,2,3,4)+2)
p<-plot_ly(d1,x=x,y=y)
p<-add_trace(d2,x=x,y=y)
p

给出错误

Error in eval(expr, envir, enclos) : object 'x' not found

有任何想法吗？ 谢谢

PS：顺便说一句，我也很奇怪，没有x = x，y = y，plot_ly无法工作。 我知道数据是像这样在内部存储的。

Answer 1

您可以尝试：

d1 = list(x=c(1,2,3,4),y=c(1,2,3,4))
d2 = list(x=c(1,2,3,4),y=c(1,2,3,4)+2)
p<-plot_ly(d1,x=x,y=y) %>% add_trace(x=d2[[1]], y=d2[[2]])
p