抑制繪圖子圖中的跡線顏色和圖例

Question

我正在生成R中的可plotly圖形列表：

set.seed(1)
scatter.list <- vector(mode="list",3)
require(plotly)

for(i in 1:3){
  df <- data.frame(x=rnorm(100),y=rnorm(100),a=LETTERS[sample(26,100,replace=T)])
  scatter.list[[i]] <- plot_ly(type='scatter',mode="markers",x=~df$x,y=~df$y,text=~df$a,data=df) %>%
    layout(xaxis=list(title=xlab,zeroline=F),yaxis=list(title=ylab,zeroline=F))
}

然后想用subplot繪制它們：

plotly::subplot(scatter.list,nrows=3,titleX=T,titleY=T)

這使：

我的問題是如何使所有子圖中的所有點都具有相同的顏色，以及如何隱藏圖例？

Answer 1

您可以使用showlegend = FALSE和通過markers = list('color' = myColor))手動設置標記顏色來隱藏圖例

require(plotly)
set.seed(1)
scatter.list <- vector(mode = "list", 3)
for(i in 1:3){
  df <- data.frame(x = rnorm(100),
                   y = rnorm(100),
                   a = LETTERS[sample(26, 100, replace = T)]
                   )
  scatter.list[[i]] <- plot_ly(type = 'scatter',
                               mode = 'markers',
                               x = ~df$x,
                               y = ~df$y,
                               text = ~df$a,
                               data= df, 
                               marker = list(color = 'darkred'), 
                               showlegend = FALSE) %>%
    layout(xaxis = list(title = xlab,
                        zeroline = F),
           yaxis = list(title = ylab,
                        zeroline = F))
}

plotly::subplot(scatter.list,
                nrows=3)