Plot fails

[Rothcopico]

Hi there, just so you know - this code doesn't seem to work at the visualisation stage.

Specifically, the issue appears to be that scale_fill_manual requires 20 colours, whereas the vector produces 10. Therefore, the plot fails to render. This seems somewhat odd, however, considering that the actual plot doesn't really need 20 colours due to the quantiles selected.