Unable to style colorbar in density mapbox

I am following the example given here: https://plotly.com/r/mapbox-density-heatmaps/

However, I am unable to change the color of the coloraxis (or use showscale = F or move the colorbar over on x).

The plot won't work unless coloraxis = 'coloraxis' is specified, and there doesn't seem to be a way to style the coloraxis.

# population density available from https://data.humdata.org/dataset/worldpop-population-density-for-haiti
pop_den <- read.csv(data_path)
plot_ly() %>% 
  add_trace(
    data = pop_den,  type = 'densitymapbox',  lat = ~Y,  lon = ~X,  z = ~Z,
    coloraxis = 'coloraxis',
    radius = 10) %>% 
  layout(
    mapbox = list(
      style = "carto-positron",
      zoom = 6.5,
      center = list(lon = -73.09, lat = 19.06),
      coloraxis = list(colorscale = "Grey", colorbar_x = 1.5)
      )
    )

Comienza reproduciendo el ejemplo de R densitymapbox en https://plotly.com/r/mapbox-density-heatmaps/ con el código del issue e inspecciona cómo se gestionan coloraxis y sus opciones de layout. Se considera terminado cuando el color de coloraxis, la visibilidad de colorbar y la posición de colorbar se puedan configurar como se solicita sin romper el gráfico.