From a9b7d15569ee56ebacb1375898698d026a64ec79 Mon Sep 17 00:00:00 2001 From: Naeem Model Date: Sun, 23 Jul 2023 02:30:56 +0000 Subject: Remove unecessary braces --- R/seqB.R | 4 ++-- 1 file 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) -- cgit v1.2.3