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:

Beginne mit dem minimalen R-Beispiel unter Verwendung von str_wrap, ggplot und ggplotly, und vergleiche die Screenshots von ggplot und ggplotly für die hebräischen Beschriftungen. Reproduziere den fehlerhaften Zeilenumbruch und untersuche den Rendering-Pfad von ggplotly; als abgeschlossen gilt die Aufgabe, wenn hebräische und andere RTL-Titel im interaktiven Plot an den richtigen Stellen umgebrochen werden.