なぜ、プロットしてbarchartでホバーが動作しないのですか？

Question

私は...

# rok miesiac ile kwartal miesiac2 kwartal2 miesiac3 limit serwis typ ile2 ile_proc lp 
# (dbl) (dbl) (dbl) (dbl) (chr) (fctr) (chr) (dbl) (chr) (chr) (dbl) (dbl) (dbl) 
# 1 2017  1 31.5  1  1 Q1 2017 Styczeń  0 Sport wizyty 32.5  97  1 
# 2 2017  2 1.0  1  2 Q1 2017  Luty  0 Sport wizyty 32.5  3  1 

をこのようなデータを持っている...と私はplotlyライブラリからこのプロットを描くしよう...

plot_ly(tab, 
     x = ~lp, 
     y = ~ile, 
     color = ~miesiac2, 
     type = "bar", 
     text = ~miesiac3, 
     hoverinfo = "text") 

...とすべてがOKですが、ホバー。それはうまくいかず、私はなぜそれがわからないのですか？私が同じフォーマットのデータを持っていても少し長くても好奇心が強いのは何ですか？

問題の原因はわかりません。私はあなたが願っています！

単純なデータ：

structure(list(rok = c(2017, 2017), miesiac = c(1, 2), ile = c(31.5, 
1), kwartal = c(1, 1), miesiac2 = c("1", "2"), kwartal2 = structure(c(1L, 
1L), .Label = "Q1 2017", class = "factor"), miesiac3 = c("Styczeń", 
"Luty"), limit = c(97, 97), serwis = c("Sport", "Sport"), typ = c("wizyty", 
"wizyty"), ile2 = c(32.5, 32.5), ile_proc = c(97, 3), lp = c(1, 
1)), class = "data.frame", .Names = c("rok", "miesiac", "ile", 
"kwartal", "miesiac2", "kwartal2", "miesiac3", "limit", "serwis", 
"typ", "ile2", "ile_proc", "lp"), row.names = c(NA, -2L)) 

'長い' データ：

structure(list(rok = c(2016, 2016, 2016, 2016, 2016, 2016, 2016, 
2016, 2016, 2017, 2017), miesiac = c(4, 5, 6, 7, 8, 9, 10, 11, 
12, 1, 2), ile = c(80.1, 87.5, 159, 104, 125.3, 74.2, 84.9, 74.4, 
75.3, 81.8, 2.4), kwartal = c(2, 2, 2, 3, 3, 3, 4, 4, 4, 1, 1 
), miesiac2 = c("1", "2", "3", "1", "2", "3", "1", "2", "3", 
"1", "2"), kwartal2 = structure(c(1L, 1L, 1L, 2L, 2L, 2L, 3L, 
3L, 3L, 4L, 4L), .Label = c("Q2 2016", "Q3 2016", "Q4 2016", 
"Q1 2017"), class = "factor"), miesiac3 = c("Kwiecień", "Maj", 
"Czerwiec", "Lipiec", "Sierpień", "Wrzesień", "Październik", 
"Listopad", "Grudzień", "Styczeń", "Luty"), limit = c(308, 308, 
308, 300, 300, 300, 245, 245, 245, 244, 244), serwis = c("Sport", 
"Sport", "Sport", "Sport", "Sport", "Sport", "Sport", "Sport", 
"Sport", "Sport", "Sport"), typ = c("odslony", "odslony", "odslony", 
"odslony", "odslony", "odslony", "odslony", "odslony", "odslony", 
"odslony", "odslony"), ile2 = c(326.6, 326.6, 326.6, 303.5, 303.5, 
303.5, 234.6, 234.6, 234.6, 84.2, 84.2), ile_proc = c(25, 27, 
49, 34, 41, 24, 36, 32, 32, 97, 3), lp = c(1, 1, 1, 2, 2, 2, 
3, 3, 3, 4, 4)), class = "data.frame", .Names = c("rok", "miesiac", 
"ile", "kwartal", "miesiac2", "kwartal2", "miesiac3", "limit", 
"serwis", "typ", "ile2", "ile_proc", "lp"), row.names = c(NA, 
-11L)) 

Answer 1

私のためにプロットした作品、私は警告

Warning message: 
In RColorBrewer::brewer.pal(N, "Set2") : 
    minimal value for n is 3, returning requested palette with 3 different levels 

を得るのですが、これは単なる警告ですこの場合は無視することができます。不思議なことに、それはRColorBrewerから始まり、手動で色を指定することによって回避することができます。

library(RColorBrewer) 
# display.brewer.all() # see all the palettes 

# generate colors beforehand - same warning. extract only first two 
cols <- brewer.pal(n = 2, name = "Set2")[1:2] 

plot_ly(xyshort, 
     x = ~lp, 
     y = ~ile, 
     color = ~miesiac2, 
     colors = cols, # explicitly name colors 
     type = "bar", 
     text = ~miesiac3, 
     hoverinfo = "text") 

Windows 7の場合は3.3.3、plotly_4.5.6の場合は3.3.3です。