как изменить значение 1 на NA

Question

У меня есть проблема, как изменить значение красных облаков = 1, а не облаков = NA становится облаками = NA, а не облаками = 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)