diff --git a/DESCRIPTION b/DESCRIPTION
index c1cc9bd..8744241 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: BayesianMCPMod
 Title: Bayesian MCPMod
-Version: 0.1.3-1
+Version: 0.1.3-2
 Authors@R: c(
     person("Sebastian", "Bossert",
            role = "aut",
diff --git a/tests/testthat/test-bootstrapping.R b/tests/testthat/test-bootstrapping.R
index 0addcb5..c9e57a7 100644
--- a/tests/testthat/test-bootstrapping.R
+++ b/tests/testthat/test-bootstrapping.R
@@ -134,18 +134,18 @@ posterior   = post_observed,
     posterior   = post_observed,
     simple      = FALSE)
 
-  result_simple <- getBootsrapBands(fit_simple)
-  result <- getBootsrapBands(fit)
+  result_simple <- getBootstrapBands(fit_simple)
+  result <- getBootstrapBands(fit)
   expect_type(result_simple, "list")
   expect_type(result, "list")
 
-  result_2_simple <- getBootsrapBands(fit_simple, n_samples = 1e2, alpha = c(0.1, 0.9), avg_fit = FALSE, dose_seq = c(1, 2, 3))
-  result_2 <- getBootsrapBands(fit, n_samples = 1e2, alpha = c(0.1, 0.9), avg_fit = FALSE, dose_seq = c(1, 2, 3))
+  result_2_simple <- getBootstrapBands(fit_simple, n_samples = 1e2, alpha = c(0.1, 0.9), avg_fit = FALSE, dose_seq = c(1, 2, 3))
+  result_2 <- getBootstrapBands(fit, n_samples = 1e2, alpha = c(0.1, 0.9), avg_fit = FALSE, dose_seq = c(1, 2, 3))
   expect_type(result_2_simple, "list")
   expect_type(result_2, "list")
 
-  result_3_simple <- getBootsrapBands(fit_simple, dose_seq = NULL)
-  result_3 <- getBootsrapBands(fit, dose_seq = NULL)
+  result_3_simple <- getBootstrapBands(fit_simple, dose_seq = NULL)
+  result_3 <- getBootstrapBands(fit, dose_seq = NULL)
   expect_type(result_3_simple, "list")
   expect_type(result_3, "list")
 })