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:

Bắt đầu với ví dụ R tối thiểu sử dụng str_wrap, ggplot và ggplotly, rồi so sánh ảnh chụp màn hình của ggplot và ggplotly đối với các nhãn tiếng Hebrew. Tái hiện việc ngắt dòng không đúng và điều tra đường dẫn kết xuất của ggplotly; được xem là hoàn thành khi các tiêu đề tiếng Hebrew và các tiêu đề RTL khác được ngắt dòng tại đúng vị trí trong biểu đồ tương tác.