He reunido la aplicación Shiny (a continuación), que muestra una coropleta, que se ve bien, excepto por la notación científica en la leyenda.

Me gustaría que los valores se lean: '$ 5,000,000' y '$ 4,000,000', etc., etc.

El código se reduce a

g <-choroplethr(DF, lod="state", num_buckets = 1)
g <- g + scale_fill_gradient(high = "springgreen4", low= "grey90", name="Sum")

Intenté esto:

g <- q + scale_fill_gradient(high = "springgreen4", low= "grey90", name="Sum", labels = c("5,000,000", "4,000,000", "3,000,000", "2,000,000", "1,000,000"))  

Pero recibí el errorLos saltos y las etiquetas son de diferentes longitudes.

No estoy seguro de cómo puedo especificar saltos en el eje x cuando estoy tratando con un mapa. ¿Cómo puedo crear pausas que funcionen con las etiquetas que quiero incluir? Gracias.