rm all NA catch for MERRA

mikejohnson51 · Jul 12, 2023 · 7485740 · 7485740
1 parent eb6a74e
commit 7485740
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/utils.R b/R/utils.R
@@ -100,7 +100,7 @@ dap_xyzv <- function(obj, varname = NULL, varmeta = FALSE) {
     raw$nX[i] = length[which(dims == raw$X[i])]
     raw$nY[i] = length[which(dims == raw$Y[i])]
     #raw$nT[i] = length[which(dims == raw$T[i])]
-    if(all(is.na(raw$Z))){
+    if(is.na(raw$Z)[i]){
       raw$nZ[i] = NA
     } else {
       raw$nZ[i] = length[which(dims == raw$Z[i])]