Question

我正在使用R Studio进行一些可视化。我有一个数据框列表：

tickers_df <- read.csv('tickers.csv')
v_df <- split(tickers_df, tickers_df$pair_code)

现在，我想在自己的“查看器”窗口中为v_df中的每个数据框绘制一个图。我在做：

for (pair_df in v_df) {
  col_name <- names(pair_df)[4:9]
  colors <- c('green', 'darkgreen', 'red', 'darkred', 'blue', 'darkblue')
  df_layout <- data.frame(col_name, colors)
  p <- plot_ly()
  for (i in 1:nrow(df_layout)) {
    col_name <- as.character(df_layout[i, 1])
    p <-
      add_trace(
        p,
        x = pair_df$step,
        y = pair_df[, col_name],
        name = col_name,
        type = 'scatter',
        mode = "lines",
        line = list(color = df_layout[i, 2], width = 1)
      )
    p <- layout(p, title = pair_df$pair_code[[1]])
  }
 p
}

但是此代码无法正常工作-它根本不显示任何图表。如何在一个循环中绘制许多图表？顺便说一句，只有p变量的最后一行是什么意思？像本例一样：

p <- plot_ly( x = df$time.1, y = df$total_profit, line = list(color = 'darkred'))
p #what is this standing for?

如何在自己的查看器窗口中制作许多可绘制的图表？

0 个答案: