diff --git a/tests/testthat/test-distance_object-getters.R b/tests/testthat/test-distance_object-getters.R
index 7274ac7..3029141 100644
--- a/tests/testthat/test-distance_object-getters.R
+++ b/tests/testthat/test-distance_object-getters.R
@@ -22,6 +22,6 @@ test_that("get_distance_df returns a dataframe of the distances", {
                              count_table, cutoff, FALSE)
   distances <- get_distance_df(distance_data)
   expect_true("data.frame" %in% class(distances))
-  expect_true(nrow(distances) == 1350)
+  expect_true(nrow(distances) == 962)
   expect_true(ncol(distances) == 3)
 })
diff --git a/tests/testthat/test-test-opticluster.R b/tests/testthat/test-test-opticluster.R
index 064e2f7..bfa6569 100644
--- a/tests/testthat/test-test-opticluster.R
+++ b/tests/testthat/test-test-opticluster.R
@@ -140,8 +140,8 @@ test_that("Read dist can read column and phylip files", {
                                     count_table, 0.2, FALSE)
   col_df <- get_distance_df(distance_data_column)
   phy_df <- get_distance_df(distance_data_phylip)
-  expect_true(nrow(get_distance_df(distance_data_column)) == 9604)
-  expect_true(nrow(get_distance_df(distance_data_phylip)) == 9604)
+  expect_true(nrow(get_distance_df(distance_data_column)) == 962)
+  expect_true(nrow(get_distance_df(distance_data_phylip)) == 1048)
 })