Блог

Я хочу сделать интерактивный сюжет с помощью ggplotly,

 alp3= xx %gt;%   arrange(desc(Produksi)) %gt;%   head(8) b= ggplot(alp3)    geom_col(mapping=aes(x=reorder(Buah,Produksi),y=Produksi,fill=Buah))   labs(x="",y="",title="Fruit Production")   coord_flip()   theme_light()   theme(legend.position = "none") ggplotly(b,height = 350)   

Я сделал это, и результат верен, но есть некоторые детали, которые я хочу исправить. Я хочу изменить текст на ховерборде. Я попробовал этот код

 alp3= xx %gt;%   arrange(desc(Produksi)) %gt;%   head(8) b= ggplot(alp3, text=paste("Buah: ",Buah,  "lt;brgt;Produksi: ",Produksi,"ton"))    geom_col(mapping=aes(x=reorder(Buah,Produksi),y=Produksi,fill=Buah))   labs(x="",y="",title="Fruit Production")   coord_flip()   theme_light()   theme(legend.position = "none") ggplotly(b, tooltip="text",height = 350)   

Но вместо этого ховерборд не показал, чего не хватает в коде?

И еще одна деталь, которую я хочу изменить, как изменить ось с формата e 06 на M? Есть ли какой-либо способ сделать это автоматически (если данные e 03, то формат превращается в K)?