Fix occurrence()

tesselle · Dec 19, 2024 · b49fb6d · b49fb6d
1 parent f656d4a
commit b49fb6d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/occurrence.R b/R/occurrence.R
@@ -35,7 +35,7 @@ setMethod(
     mtx[lower.tri(mtx, diag = FALSE)] <- index
 
     occ <- stats::as.dist(mtx)
-    attr(occ, "total") <- nrow(incid)
+    attr(occ, "total") <- nrow(object)
     occ
   }
 )