我在flexdashboards
中使用rbokeh
在一系列与健康相关的仪表板上创建动态交互式图表和图表。rbokeh将另一层字形添加到映射图例
我目前的困境是围绕添加一条线到带有映射颜色值的堆积条形图并将其显示在图例中。
该条形图工作完美无缺。
但是,当我添加一对ab线来分隔x轴的哪些区域收集方法发生变化时,我无法找到一种方法让线显示在映射图例中。
任何试图强迫其返回无图表在所有...
完全难住了,他会喜欢一些帮助!
CODE:
figure(title= "Confirmed & Probable Cases by Year",tools =c("pan","box_zoom", "reset", "save"), width= 1650, height =950, legend_location='top_left',toolbar_location = "above")%>%
ly_bar(x=Year, y= count, position='stack', data=probConf, width=.9, hover=TRUE, legend=TRUE, fill_alpha=.7, color=Classification) %>%
ly_abline(v=17.5, color = "red", width =1, alpha=.7)%>%
ly_abline(v=13.5, color = "red", width =1, alpha=.7, legend ="Change in Case Definition")%>%
set_palette(discrete_color = pal_color(c("#336699","#339999")))%>%
x_axis(label ='Year', grid=FALSE)%>%
y_axis(label ='Cases',grid=FALSE)
有了这个:, legend ="Change in Case Definition"
在那里,我得到任何图表所有,只是白色的。
与ly_abline(v=13.5, color = "red", width =1, alpha=.7)%>%
我得到一个很好的图表,没有图例上的线条,如下图所示。
有了:ly_abline(v=13.5, color = "red", width =1, alpha=.7, legend = TRUE)%>%
我得到根本没有图(但没有错误代码,白色只是一片汪洋)
谢谢你的回复。我开始沿着你建议的道路走,它变得浑浊。所以,我骗了!我挤压了ly_bar,然后使用Notepad ++打开了一张我用ly_points和类似的线条绘制的图形,并使用'find'来查看在图例中放置线条,复制该代码并将其移动到相同的位置我的条形图中的空间,根据线的颜色,id的内容,将其复制并放入新的图例代码中。点击保存,解除它,我有一个完美的传说。当我在那里时,我也改变了悬停的“变量”和“价值”。 – sconfluentus