I have a problem, how to change the value of clouds that are red = 1, and not clouds = NA becomes clouds = NA and not clouds = 1
r1<-brick("001/110-05_2015001.ers")
ggRGB(r1,r=2,g=3,b=1,stretch = "lin")
cldmsk<- cloudMask(r1, blue = 1, tir = 5)
ggR(cldmsk, 2, geom_raster = TRUE)
cldmsk_final <- cloudMask(cldmsk, threshold = 0.5, buffer = 3)
ggRGB(r1,2,3,1, stretch = "lin") +ggR(cldmsk_final[[1]], ggLayer = TRUE, forceCat = TRUE, geom_raster = TRUE) +scale_fill_manual(values = "red", na.value = NA)