From dae8255b047087184dd24aa8dd935e5d26b2a7dc Mon Sep 17 00:00:00 2001
From: Ward9250 <axolotlfan9250@gmail.com>
Date: Fri, 27 Feb 2015 16:37:49 +0000
Subject: [PATCH] Fixed test of SS analysis tables

---
 tests/testthat/testTriplets.R | 2 --
 1 file changed, 2 deletions(-)

diff --git a/tests/testthat/testTriplets.R b/tests/testthat/testTriplets.R
index d09fbda..f7d3068 100644
--- a/tests/testthat/testTriplets.R
+++ b/tests/testthat/testTriplets.R
@@ -7,8 +7,6 @@ test_that("reference objects storing sequence similarity scan tables work correc
   ssObj <- hyb$triplets$triplets[[1]]$ScanData
   expect_is(ssObj$TableFile, "character")
   expect_is(ssObj$Table, "data.frame")
-  expect_true(ssObj$tableIsBlank())
-  hyb$analyzeSS(c("Seq1", "Seq2", "Seq3"))
   expect_false(ssObj$tableIsBlank())
   expect_true(!any(apply(ssObj$Table, 2, function(x) any(is.na(x)))))
   ssObj$blankTable()