Specify sample_id for rel_abundance matrix in ord techniques

R/adders_samples.R

@@ -296,7 +296,7 @@ add_ord <- function(ta, distance="bray", method="pcoa", dims=2, binary=FALSE, ..
   }
 
   # make relative abundance matrix
-  rel_abundance_matrix <- rel_abundance_matrix(ta)
+  rel_abundance_matrix <- rel_abundance_matrix(ta, sample_name=sample_id, taxon_name=taxon_id)
 
   # make Bray-Curtis distance matrix
   dist_matrix = vegan::vegdist(rel_abundance_matrix, method = distance, binary=binary)