f

rspatial · Aug 24, 2023 · 5a405e8 · 5a405e8
1 parent 201f622
commit 5a405e8
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/R/focal.R b/R/focal.R
@@ -23,13 +23,13 @@ function(x, w=3, fun="sum", ..., na.policy="all", fillvalue=NA, expand=FALSE, si
 
 	if (is.matrix(w)) {
 		m <- as.vector(t(w))
-		if (!all(m %in% c(0, 1, NA))) {
-			if (isTRUE(list(...)$na.rm)) {
-				if (txtfun != "sum") {
+		#if (!all(m %in% c(0, 1, NA))) {
+			#if (isTRUE(list(...)$na.rm)) {
+			#	if (txtfun != "sum") {
 					# error("focal", 'with "na.rm=TRUE" and weights other than 0, 1, or NA, only fun="sum" is allowed')
-				}
-			}
-		}
+			#	}
+			#}
+		#}
 		w <- dim(w)
 	} else {
 		w <- rep_len(w, 2)