Remove unecessary braces

1 files changed, 2 insertions, 2 deletions

diff --git a/R/seqB.R b/R/seqB.R
index 09efe07..1dcf927 100644
--- a/R/seqB.R
+++ b/R/seqB.R
@@ -78,9 +78,9 @@
 #'
 #' @export
 seqB <- function(NT, mu, kappa = 20) {
-  if (length(NT) < 2) {
+  if (length(NT) < 2)
     print("Warning: length of NT should be at least two.")
-  } else {
+  else {
     if (min(NT) > 0) {
       times <- 1:length(NT)
       tau <- diff(times)