Как добавить фигуры в AL oop в графически R? - PullRequest
Новая
       31

Как добавить фигуры в AL oop в графически R?

0 голосов
/ 05 апреля 2020 

for (i in 1:nrow(histfolder)) {
  x0[i] <- min(histfolder[[5]][[i]]$offset)
  x1[i] <- max(histfolder[[5]][[i]]$offset)
  y0[i] <- hist_percentiles[[4]][[i]]
  y1[i] <- hist_percentiles[[5]][[i]]

p1 <- p1 %>%
  layout(shapes = list(
    list(
      type = "line",
      line = list(color = "red"),
      x0 = 0,
      x1 = max(ae_combined$offset),
      xref = 'paper',
      y0 = UQTL,
      y1 = UQTL,
      yref = "y"
    ),
    list(
      type = "line",
      line = list(color = "red"),
      x0 = 0,
      x1 = max(ae_combined$offset),
      xref = 'paper',
      y0 = QTL,
      y1 = QTL,
      yref = "y"
    ),
    list(
      type = "rect",
      line = list(color = "blue"),
      x0 = x0[[i]],
      x1 = x1[[i]],
      xref = 'x',
      y0 = y0[[i]],
      y1 = y1[[i]],
      yref = "y"
    )
  )
  )
}

Я пытаюсь добавить несколько фигур в пределах al oop и использовал приведенный выше код. Я получаю только один прямоугольник angular вместо 2, как вы можете видеть на пи c ниже, вторая фигура не отображается, и отражается только фигура.

...