R - 多行绘制简单循环的 Plotly 问题

Question

您好，使用下面的代码我无法生成多行，已经尝试过其他解决方案，如 inherit, evauate = TRUE/FALSE 并且它没有显示所有行。如果我在循环外使用相同的代码，它工作正常...

library("plotly")

test = data.frame(replicate(3,sample(0:10,10,rep=TRUE)))
test 

fig <- plot_ly()
for (i in names(test)){
  temp = test[[i]]
  print(temp)
  fig <- fig %>% add_trace(x = ~1:10, y = ~temp, type="scatter", mode = 'lines')
}
fig

output

Answer 1

试试这个。当您在循环内添加跟踪而不使用数据框作为参数时，您可以避免使用 ~ 符号并直接调用值。这里的代码：

library("plotly")

test = data.frame(replicate(3,sample(0:10,10,rep=TRUE)))
test 

fig <- plot_ly()
for (i in names(test)){
  temp = test[[i]]
  fig <- fig %>% add_trace(x = 1:10, y = temp, type="scatter", mode = 'lines')
}
fig

输出：

R - 多行绘制简单循环的 Plotly 问题

R - Plotly issue with multiple lines plotting simple loop

loops

r

r-plotly