Colors generation for any number of breaks

Hi,

I don't remember exactly how ColorBar() and other functions work. I want to report that we are using a piece of code to generate the colours for PlotEquiMap:

breaks <- seq(-2.5,2.5,0.1)
  dry_to_wet_palette <- colorRampPalette(c("#d95f0e", "white", "#2ca25f"))
  colors <- dry_to_wet_palette(length(breaks)+1)
  col_inf <- colors[1]
  col_sup <- colors[length(colors)]
  colors <- colors[2:(length(colors)-1)]

We need to use the colours from PlotForecastPDF for other graphs (i.e. 's2s4e' and 'hydro' options).

Thanks for sharing @cdelgado

Núria