Merge pull request #394 from OldLipe/hotfix/cloudband

closes #393
e-sensing · Sep 27, 2021 · 60c71ad · 60c71ad
2 parents c38eb6f + 68d36b4
commit 60c71ad
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: sits
 Type: Package
-Version: 0.14.1
+Version: 0.14.1-1
 Title: Satellite Image Time Series Analysis for Remote Sensing Data Cubes
 Authors@R: c(person('Rolf', 'Simoes', role = c('aut'), email = 'rolf.simoes@inpe.br'),
              person('Gilberto', 'Camara', role = c('aut', 'cre'), email = 'gilberto.camara@inpe.br'),

diff --git a/NEWS.md b/NEWS.md
@@ -5,6 +5,11 @@ We are preparing to release the package on CRAN and are making relevant changes
 
 # What's new in SITS version 0.14.1
 
+
+### New features in SITS version 0.14.1-1
+
+* Bug in cube generated by sits_regularize() cannot have "CLOUD" band
+
 ### New features in SITS version 0.14.1
 
 * Implement new function `sits_list_collections()`

diff --git a/R/sits_gdalcubes.R b/R/sits_gdalcubes.R
@@ -168,6 +168,9 @@
     # update nrows and ncols
     cube[, c("nrows", "ncols")] <- cube_view$space[c("ny", "nx")]
 
+    # hot fix remove cloud band
+    cube$bands[[1]] <- setdiff(cube$bands[[1]], "CLOUD")
+
     return(cube)
 }