Fix row names in multiple_comparisons table

When printing the multiple_comparisons table, the row names are not from 1 to n. I'm just resetting the order before returning the object.
biometryhub · Jul 21, 2023 · 9afa35a · 9afa35a
1 parent c1bbb87
commit 9afa35a
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/R/mct.R b/R/mct.R
@@ -470,6 +470,8 @@ multiple_comparisons <- function(model.obj,
         attr(pp.tab, 'aliased') <- as.character(aliased_names)
     }
 
+    rownames(pp.tab) <- NULL
+
     return(pp.tab)
 }