R语言将醒目的图例放在图表顶部

bfnvny8b 于 2023-03-20 发布在其他

关注(0)|答案(1)|浏览(127)

我怎样才能把图例放在图表的顶部而不是底部呢？

library(plotly)
library(tidyr)
library(plyr)

data <- spread(Orange, Tree, circumference)
data <- rename(data, c("1" = "Tree1", "2" = "Tree2", "3" = "Tree3", "4" = "Tree4", "5" = "Tree5"))

fig <- plot_ly(data, x = ~age, y = ~Tree1, type = 'scatter', mode = 'lines', name = 'Tree 1')
fig <- fig %>% add_trace(y = ~Tree2, name = 'Tree 2')
fig <- fig %>% add_trace(y = ~Tree3, name = 'Tree 3')
fig <- fig %>% add_trace(y = ~Tree4, name = 'Tree 4')
fig <- fig %>% add_trace(y = ~Tree5, name = 'Tree 5')
fig <- fig %>% layout(legend = list(orientation = 'h'))

fig

来源：https://stackoverflow.com/questions/75724942/put-plotly-legend-on-top-of-chart

1条答案

按热度按时间

mf98qq941#

您可以在layout中指定legend的x和y坐标，如下所示：

library(plotly)
library(tidyr)
library(plyr)

fig <- plot_ly(data, x = ~age, y = ~Tree1, type = 'scatter', mode = 'lines', name = 'Tree 1')
fig <- fig %>% add_trace(y = ~Tree2, name = 'Tree 2')
fig <- fig %>% add_trace(y = ~Tree3, name = 'Tree 3')
fig <- fig %>% add_trace(y = ~Tree4, name = 'Tree 4')
fig <- fig %>% add_trace(y = ~Tree5, name = 'Tree 5')
fig <- fig %>% layout(legend = list(orientation = 'h', x = 0, y = 1.1))

fig

创建于2023年3月13日，使用reprex v2.0.2

赞(0）回复(0）举报 2023-03-20

我来回答

R语言将醒目的图例放在图表顶部

1条答案

相关问题

热门标签

最新问答

R语言 将醒目的图例放在图表顶部

1条答案

相关问题

热门标签

最新问答

R语言将醒目的图例放在图表顶部