some updates for ape 3.0-6

[ape.git] / R / dbd.R

diff --git a/R/dbd.R b/R/dbd.R
index 3a325dc6fcee654815446b6aa57c19e59b48893a..b0beb7a4078af31a2ba1d9d77d956c11968a8d86 100644 (file)
--- a/R/dbd.R
+++ b/R/dbd.R
@@ -1,4 +1,4 @@
-## dbd.R (2012-03-19)
+## dbd.R (2012-09-14)
 
 ##   Probability Density Under Birth--Death Models
 
@@ -27,10 +27,6 @@ dbd <- function(x, lambda, mu, t, conditional = FALSE, log = FALSE)
         mu <- mu[1]
         warning("only the first value of 'mu' was considered")
     }
-    if (length(t) > 1) {
-        t <- t[1]
-        warning("only the first value of 't' was considered")
-    }
 
     if (mu == 0) return(dyule(x, lambda, t, log))