diff --git a/RAutoClDs.R b/RAutoClDs.R index 087f984..5c2fe78 100644 --- a/RAutoClDs.R +++ b/RAutoClDs.R @@ -162,7 +162,7 @@ dndat <- function(NDATA){ DDATA[i,j]=0L } else if(NDATA[i,j] > 1){ DDATA[i,j]=2L - } else if(-1 <= NDATA[i,j] && NDATA[i,j] < 1){ + } else if(-1 <= NDATA[i,j] && NDATA[i,j] <= 1){ DDATA[i,j]=1L } } else{