多个add_markers R图
多个add_markers R图
提问于 2020-05-16 19:40:21
我尝试在相同的图(相同的x.axis和相同的y.axis)上显示不同颜色的此数据。
我的第一个代码：
fig <- plot_ly(partitions, x = ~`_Dim.1`, y = ~`_Dim.2`, name = 'Complete link : Data Scaled, K = 2', type = 'scatter', mode = 'markers',
marker = list(size=12,symbol=0,color=~`_z_comp_scale`),
hoverinfo = 'text',
text = ~paste('</br> Pays: ', code_country)) %>%
add_trace(marker=list(size=12,symbol=1,color=~`_z_comp`),inherit=TRUE,name="complet : K = 2") %>%
add_markers(marker=list(size=12,symbol=2,color=~`_z_comp2`),name="complet : K = 5") %>%
add_markers(marker=list(size=12,symbol=3,color=~`_z_avg_scale`),name="average : data Scaled, K = 3") %>%
add_markers(marker=list(size=12,symbol=4,color=~`_z_avg_scale2`),name="average : data Scaled, K = 8") %>%
add_markers(marker=list(size=12,symbol=5,color=~`_z_avg`),name="average : K = 2") %>%
add_markers(marker=list(size=12,symbol=6,color=~`_z_avg2`),name="average : K = 5") %>%
add_markers(marker=list(size=12,symbol=7,color=~`_z_ward_scale`),name="ward : data scaled, k = 2") %>%
add_markers(marker=list(size=12,symbol=8,color=~`_z_ward`),name="ward : k = 2") %>%
add_markers(marker=list(size=12,symbol=9,color=~`_z_ward2`),name="ward : k = 5")
fig给我：Plot
但是我想改变颜色，因为对于一个有八个组的分区来说，实际颜色对眼睛来说不是很清楚。
所以我试着这样做：
fig <- plot_ly(partitions, x = ~`_Dim.1`, y = ~`_Dim.2`, name = 'Complete link : Data Scaled, K = 2', type = 'scatter', mode = 'markers',
size=12,symbol=0,colors=couleurs,color=~`_z_comp_scale`,
hoverinfo = 'text',
text = ~paste('</br> Pays: ', code_country)) %>%
add_markers(marker=list(),size=12,symbol=0,colors=couleurs,color=~`_z_comp`,name="complet : K = 2") %>%
add_markers(size=12,symbol=0,colors=couleurs,color=~`_z_comp2`,name="complet : K = 5") %>%
add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg_scale`,name="average : data Scaled, K = 3") %>%
add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg_scale2`,name="average : data Scaled, K = 8") %>%
add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg`,name="average : K = 2") %>%
add_markers(size=12,symbol=3,colors=couleurs,color=~`_z_avg2`,name="average : K = 5") %>%
add_markers(size=12,symbol=2,colors=couleurs,color=~`_z_ward_scale`,name="ward : data scaled, k = 2") %>%
add_markers(size=12,symbol=2,colors=couleurs,color=~`_z_ward`,name="ward : k = 2") %>%
add_markers(size=12,symbol=2,colors=couleurs,color=~`_z_ward2`,name="ward : k = 5")
fig <- fig %>% layout(legend = l)
fig结果是：Plot
我想删除上面的图例。
我想我离我的目标很近了，有什么可以帮我的吗？感谢您的关注。
麦克斯·马马吉塔
回答 1
Stack Overflow用户
发布于 2020-05-17 02:26:24
在这张图上，颜色可以清楚地区分每一组，但需要关注的是图例的级别。每个add_markers都显示在图例的顶部。这不是很好：
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/61836155
复制相关文章
相似问题
腾讯云开发者
