Line breaks in 3D plot titles do not work

[kendonB]

library(plotly)
data(mtcars)
mtcars$am[which(mtcars$am == 0)] <- 'Automatic'
mtcars$am[which(mtcars$am == 1)] <- 'Manual'
mtcars$am <- as.factor(mtcars$am)

p <- plot_ly(mtcars, x = ~wt, y = ~hp, z = ~qsec, color = ~am, colors = c('#BF382A', '#0C4B8E')) %>%
  add_markers() %>%
  layout(scene = list(xaxis = list(title = 'Weight'),
                      yaxis = list(title = 'Gross horsepower\nthis title is<br>really long'),
                      zaxis = list(title = '1/4 mile time')))
p

[cpsievert]

I believe this is something that needs to be implemented on the plotly.js level, for progress track plotly/plotly.js#3196