Я получаю эту ошибку при преобразовании ggplot в plotyly. Что делать?
Мой код:
p <- ggplot(data_, aes(data_$dates,group = 1)) +
geom_point(aes(y = data_$exp))+
geom_point(aes(y = data_$actual))+
geom_line(aes(y = data_$exp, color='Expected')) +
geom_line(aes(y = data_$actual, color='Actual'))+
geom_label(aes(y = data_$exp,label = data_$exp,hjust = 0,vjust = -0.2))+
geom_label(aes(y = data_$actual,label = data_$actual,hjust = 0,vjust = 0.2 ))+
labs(title = "Avail")+
labs(x = "Dates")+
labs(y = "")+
guides(color = guide_legend(title = ""))
output$trendPlot <- renderPlotly({
ggplotly(p)
})
Я получаю ошибку:
geom_GeomLabel() has yet to be implemented in plotly.
If you'd like to see this geom implemented,
Please open an issue with your example code at
https://github.com/ropensci/plotly/issues
Warning in origRenderFunc() :
Ignoring explicitly provided widget ID "85055e160099"; Shiny doesn't use them
Ошибка означает, что plotly
на данный момент не может обрабатывать geom_label
из ggplot2
. Одна вещь, которую можно сделать, - это, как подсказывает ошибка, открыть проблему на https://github.com/ropensci/plotly/issues. Однако бывает, что geom_text
действительно работает, поэтому замена geom_label
на него была бы самым простым решением.
@qwww, это ответ на ваш вопрос?