Commit 8fbadf3b authored by Jean-Baptiste Feret's avatar Jean-Baptiste Feret

correct Spectral to SpectralFilter

parent 42f474da
......@@ -64,7 +64,7 @@ map_spectral_species <- function(Input_Image_File,Output_Dir,PCA_Files,PCA_model
}
print("Apply PCA to subset prior to k-Means")
# remove constant bands if needed
if (!length(Spectral$BandsNoVar) == 0) {
if (!length(SpectralFilter$BandsNoVar) == 0) {
Subset$DataSubset <- Subset$DataSubset[, -SpectralFilter$BandsNoVar]
}
if (TypePCA == "PCA" | TypePCA == "SPCA") {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment