r 散景图图例 - 移动不当

Question

我一直在使用 rbokeh 在 flexdashboards 中绘制一些动态图。因为这是一个映射到变量 Classification 中的分类数据的条形图，我无法手动创建图例，这很好，因为 rbokeh 会自动创建它。

但是，我在图例和标签方面遇到了一些问题：

放置的太烂了，我想告诉r放在左上角，让它远离有内容的栏。
我想将红色ab_line放入图例中并标记它（使用标准legend =将不起作用，因为基础图表中的映射变量
此图需要符合 508 标准才能进行翻译，flexdashboard 以及左侧边缘的散景工具和弹出窗口中的键都符合，但值和标签保留在英语。有没有人有办法让图表响应 google 翻译？如果这涉及编辑挤压页面，我很好......我只需要更多的指导来完成它。

figure(title=" Confirmed & Probable Cases by Year",width= 1400, height =350)%>% ly_bar(x=Year, y= count, position='stack', data=probConf, width=.9,hover=TRUE, legend=TRUE, color=Classification) %>% x_axis(label ='Year')%>% y_axis(label ='Cases')%>% ly_abline(v=17.5, legend=NULL, color = "red", width =1, alpha=.5)%>% [![enter image description here][1]][1]set_palette(discrete_color = pal_color(c("#ee9f00", "#ffcc66")))

Answer 1

要回答第 1 个问题，您可以使用 legend_location 指定图例的位置（请参见下面的示例并注意我将 probConf 数据替换为晶格大麦数据集，以便它可重现对于其他人）。

figure(title = " Confirmed & Probable Cases by Year", width = 1400,
  height = 350, legend_location = "top_left") %>%
  ly_bar(x = variety, y = yield, position = "stack", data = lattice::barley,
    width = 0.9, hover = TRUE, legend = TRUE, color = year) %>%
  x_axis(label = "Year") %>%
  y_axis(label = "Cases") %>%
  ly_abline(v = "Svansota:1", color = "red",  width = 1, alpha = 0.5) %>%
  set_palette(discrete_color = pal_color(c("#ee9f00", "#ffcc66")))

#2 目前很难在 rbokeh 中实现，但它应该在未来对这种情况（混合映射和用户定义的图例条目）更加健壮。如果 ly_abline() 接受数据作为参数，您可以使用颜色映射变量来解决问题。

一个不太漂亮的解决方案是使用 ly_rect 手动绘制条形图多边形（每个分类调用 ly_rect 一次）并为这些使用自定义图例条目，然后添加ly_abline.

的自定义图例条目

我不知道 #3 的答案。

r 散景图图例 - 移动不当

r bokeh chart legend - placed poorly move

translation

r

legend

labels

rbokeh