Этот участок / карта Альп представляет собой тепловую карту накопления снега за 5 дней. Точки разрыва цвета различаются в зависимости от условий. Я хотел бы иметь следующую точку останова: 20,40,60,80 с цветами от синего до желтого. Цвет текста индикатора должен быть белым. Также индикатор шкалы должен быть расположен на верхнем цвете.
par(mar=c(0, 0, 0, 0))
png("PLOTS/snow_c5.png", width = 900, height = 450, res=72, bg = 'transparent')
alps <- plot(nnmsk, axes=FALSE, box=FALSE,
col = colorRampPalette(c("transparent","transparent","#4A9EE7","#1A6AB4", "#F3970D", "#FD5602","#C20011"))(500))
points(dfpoi$Longitude, dfpoi$Latitude, col = "transparent", cex = .4)
text(x=dfpoi$Longitude,y=dfpoi$Latitude,labels=dfpoi$resort, cex=0.7, font=1,pos=4,adj=0,col="#2d2d2d")
dev.off()
