Fix homogenize #789

r-lidar · Dec 3, 2024 · 177eee2 · 177eee2
1 parent 09a878b
commit 177eee2
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 2 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -18,6 +18,7 @@ v4.2.0 brings new tools for terrestrial data (TLS, MLS):
 - Enhance: Improved the `crs()`, `is.empty()`, and `area()` functions, which now inherit from `terra`, avoiding conflicts with `terra`.
 - Enhance: Addressed issue #776 to allow `readLAScatalog()` to skip corrupted files.
 - Enhance: Optimized performance for many operations on TLS data.
+- Fix: #789 `homogenize()`
 
 ## lidR v4.1.2 (Release date: 2024-07-09)
 

diff --git a/R/algorithm-dec.R b/R/algorithm-dec.R
@@ -240,8 +240,9 @@ random_per_voxel = function(res = 1, n = 1)
     return(rep(TRUE, length(pulseID)))
 
   selectedPulses <- sample(p, n)
-  selectedPulses <- pulseID %in% selectedPulses
   selectedPulses <- sort(selectedPulses)
+  selectedPulses <- pulseID %in% selectedPulses
+
 
   return(selectedPulses)
 }
diff --git a/src/Makevars b/src/Makevars
@@ -1,2 +1,2 @@
-PKG_CXXFLAGS = $(SHLIB_OPENMP_CXXFLAGS) -I../inst/include/ -DRCPP_NO_MODULES
+PKG_CXXFLAGS = $(SHLIB_OPENMP_CXXFLAGS) -I../inst/include/ -DRCPP_NO_MODULES -DWITHSETLENGTH
 PKG_LIBS = $(LAPACK_LIBS) $(BLAS_LIBS) $(FLIBS) $(SHLIB_OPENMP_CXXFLAGS)