aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
Diffstat (limited to 'R')
-rw-r--r--R/seqB.R4
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)