rbokehマップされた凡例に別のレイヤーグリフを追加

Question

私はflexdashboardsでrbokehを使用して、一連の健康関連ダッシュボード上でダイナミックなインタラクティブなグラフとチャートを作成しています。

現在のジレンマは、マップされた色の値を持つ積み上げ棒グラフに行を追加して凡例に表示することを中心に行われています。

棒グラフは問題なく動作しています。

しかし、コレクション方法の変更が発生するx軸の領域を区切るために一対のab線を追加すると、マップされた凡例にその行が表示されるような方法を見つけることができません。

それはまったく表を返さない強制しようとすると...

完全に困惑し、いくつかの助けを大好きです！

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"そこでは、私は、まったくちょうど白noグラフを取得していません。

ly_abline(v=13.5, color = "red", width =1, alpha=.7)%>%私は、下の写真のように、凡例に線がない素晴らしいチャートを得ています。で

：ly_abline(v=13.5, color = "red", width =1, alpha=.7, legend = TRUE)%>%

私は全然チャート（ただし、エラーコード、白だけの広大な）を取得しない

Answer 1

残念ながら現在マップ含む伝説（v0.5.1のような）rbokehで属性とカスタム凡例を混在させることはできません。これを実現するには、ly_bar()の代わりにly_rect()の下位レベルにカスタム凡例を使用して、各バーカラーの矩形を描画します。