diff --git a/DESCRIPTION b/DESCRIPTION
index b90e1509d71e9e7186d73f23ae083d7f221fa022..5fcd5d046d98fd31b5c08b15bb48e1651d671289 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: splatter
 Type: Package
 Title: Simple Simulation of Single-cell RNA Sequencing Data
-Version: 1.5.4
-Date: 2018-08-30
+Version: 1.5.5
+Date: 2018-10-03
 Author: Luke Zappia
 Authors@R:
     c(person("Luke", "Zappia", role = c("aut", "cre"),
diff --git a/NEWS.md b/NEWS.md
index 1a18be3bf6b12a8226d164e7bebfc508d1e308b6..becf7c5059360c47fc1abb24278f888c58cbbe32 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,4 +1,8 @@
-## Version 1.5.3 (2018-08-30)
+## Version 1.5.5 (2018-10-03)
+
+* Fix BASiCSEstimate tests
+
+## Version 1.5.4 (2018-08-30)
 
 * Fix installation instructions
 
diff --git a/tests/testthat/test-BASiCSEstimate.R b/tests/testthat/test-BASiCSEstimate.R
index f1fe32bc4b9978e84a17fc03c96fe60471344c47..3e1df27accc507d6fbd9a58cfe8b85b26a7d33a6 100644
--- a/tests/testthat/test-BASiCSEstimate.R
+++ b/tests/testthat/test-BASiCSEstimate.R
@@ -9,7 +9,7 @@ test_that("BASiCSEstimate works", {
     spike.info <- data.frame(Name = rownames(sc_example_counts)[1:10],
                              Input = rnorm(10, 500, 200),
                              stringsAsFactors = FALSE)
-    counts <- sc_example_counts[, 1:20]
+    counts <- sc_example_counts[, 1:30]
     counts <- counts[rowSums(counts) != 0, ]
     params <- BASiCSEstimate(counts[1:100, ],
                              spike.info, verbose = FALSE, progress = FALSE)
@@ -19,7 +19,7 @@ test_that("BASiCSEstimate works", {
 test_that("BASiCSEstimate works without spikes", {
     skip_if_not_installed("BASiCS")
     set.seed(1)
-    counts <- sc_example_counts[, 1:20]
+    counts <- sc_example_counts[, 1:30]
     counts <- counts[rowSums(counts) != 0, ]
     batch <- sample(1:2, ncol(counts), replace = TRUE)
     params <- BASiCSEstimate(counts[1:100, ], batch = batch,