Я использовал код для своего растрового изображения, но большая часть изображения имеет тот же цвет. Есть ли способ разделить цвет и сделать изображение более привлекательным? Пожалуйста, помогите мне это сделать.
library(raster)
poc1 <- raster("A20030602019090.L3m_MC_POC_poc_4km.nc")
poc1
poccol <- colorRampPalette(c("lightgreen", "green", "orange", "red", "darkred","yellow","purple", "blue"))
ma.area <- extent(80, 96, 5, 25)
ma.poc1 <- crop(poc1, ma.area)
plot(ma.poc1, zlim=c(10,600), col=poccol(100))
