How to create irregular color scale in levelplot?

问题

Somebody can help me to create color scale like this picture. I have tried a basic code below, but didn't work well...

chl <- colorRampPalette(c('midnight blue','cyan 4','green 3','yellow','goldenrod 3','tomato 3'))
levelplot(raster_name, col.regions = chl, at=c(0.03, 0.1, 0.4, 2, 10, 30),
           margin=FALSE, ylab='Latitude', xlab='Longitude')

来源：https://stackoverflow.com/questions/60702075/how-to-create-irregular-color-scale-in-levelplot