diff --git a/tests/testthat/test-SDA_query.R b/tests/testthat/test-SDA_query.R
index a20acc02..13812fde 100644
--- a/tests/testthat/test-SDA_query.R
+++ b/tests/testthat/test-SDA_query.R
@@ -287,7 +287,7 @@ test_that("SDA_query() works with multi-line records", {
   
   # https://github.com/ncss-tech/soilDB/issues/28
   expect_true(inherits(x.4, 'data.frame'))
-  expect_true(nrow(x.4) == 7)
+  expect_equal(nrow(x.4), 6)
 
 })
 
diff --git a/tests/testthat/test-get_SDA_property.R b/tests/testthat/test-get_SDA_property.R
index b6651f55..115ef276 100644
--- a/tests/testthat/test-get_SDA_property.R
+++ b/tests/testthat/test-get_SDA_property.R
@@ -192,7 +192,9 @@ test_that("SDA properties (weighted average) works", {
                             mukeys = 545857)
   skip_if(inherits(agg, 'try-error'))
   skip_if(inherits(noagg, 'try-error'))
-
+  
+  skip_if_not_installed("aqp")
+  
   aqp::depths(noagg) <- cokey ~ hzdept_r + hzdepb_r
   aqp::site(noagg) <- ~ comppct_r