Displaying Hebrew and RTL Languages

Although ggplotly does display Hebrew text correctly, when I try to use str_wrap or other means to wrap titles, it doesnt display the text properly. It appears to wrap the text incorrectly, breaking the sentence up at the wrong points.

Heres a minimal working example:

library(plotly)
# DB
Occupation = c("תל אביב", "באר שבע", "רמת גן", "גבעתיים", "ירושלים", "אילת", "טבריה", "אשקלון", "שם ארוך מאוד")
df <- as.data.frame(Occupation) %>% 
  mutate(n = row_number()*10)

df$Occupation <- str_wrap(df$Occupation, width = 6) %>% as.factor()

# PLOT
plot <- df %>% ggplot(aes(x = Occupation, y = n)) +
  geom_col()

ggplotly(plot)

ggplot:

ggplotly:

Comienza con el ejemplo mínimo de R usando str_wrap, ggplot y ggplotly, y compara las capturas de pantalla de ggplot y ggplotly para las etiquetas en hebreo. Reproduce el ajuste de línea incorrecto e investiga la ruta de renderizado de ggplotly; se considera terminado cuando los títulos en hebreo y otros títulos RTL se ajusten en los puntos correctos en el gráfico interactivo.