new c.DNAbin()

git-svn-id: https://svn.mpl.ird.fr/ape/dev/ape@74 6e262413-ae40-0410-9e79-b911bd7a66b7

diff --git a/ChangeLog b/ChangeLog
index 9191a65ad570749ac6c449b469c9158c1624b841..accd346a9138052ee8dac70c48ee7bc5addf9c77 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,11 @@
                CHANGES IN APE VERSION 2.3-1
 
 
+NEW FEATURES
+
+    o There is now a c() method for lists of class "DNAbin".
+
+
 BUG FIXES
 
     o dist.gene() failed on most occasions with the default

diff --git a/DESCRIPTION b/DESCRIPTION
index 54665c2b68ac86879d5005c2ad45fa24b0ff9d61..7f69fe2d1c1560a414b7e3d2de85700ff90999ba 100644 (file)
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: ape
 Version: 2.3-1
-Date: 2009-05-13
+Date: 2009-05-19
 Title: Analyses of Phylogenetics and Evolution
 Author: Emmanuel Paradis, Ben Bolker, Julien Claude, Hoa Sien Cuong, Richard Desper, Benoit Durand, Julien Dutheil, Olivier Gascuel, Gangolf Jobb, Christoph Heibl, Daniel Lawson, Vincent Lefort, Pierre Legendre, Jim Lemon, Yvonnick Noel, Johan Nylander, Rainer Opgen-Rhein, Korbinian Strimmer, Damien de Vienne
 Maintainer: Emmanuel Paradis <Emmanuel.Paradis@ird.fr>

diff --git a/R/DNA.R b/R/DNA.R
index 7599265ea7ba08f3792cfd3fc5034b0b75889b61..b73d7955c4571d6068852423fa66d9d7c7593581 100644 (file)
--- a/R/DNA.R
+++ b/R/DNA.R
@@ -1,4 +1,4 @@
-## DNA.R (2009-05-10)
+## DNA.R (2009-05-19)
 
 ##   Manipulations and Comparisons of DNA Sequences
 
@@ -142,6 +142,9 @@ cbind.DNAbin <-
     ans
 }
 
+c.DNAbin <- function(..., recursive = FALSE)
+    structure(NextMethod("c"), class = "DNAbin")
+
 print.DNAbin <- function(x, ...)
 {
     n <- 1 # <- if is.vector(x)

diff --git a/man/DNAbin.Rd b/man/DNAbin.Rd
index 87ec965461b4ff0dfcfeaea23027218d2512a9ce..a191f9950cda149c73131433ec4edb62a52da4f0 100644 (file)
--- a/man/DNAbin.Rd
+++ b/man/DNAbin.Rd
@@ -19,13 +19,14 @@
              quiet = FALSE)
 \method{[}{DNAbin}(x, i, j, drop = TRUE)
 \method{as.matrix}{DNAbin}(x, \dots)
+\method{c}{DNAbin}(\dots, recursive = FALSE)
 }
 \arguments{
   \item{x, object}{an object of class \code{"DNAbin"}.}
   \item{\dots}{either further arguments to be passed to or from other
     methods in the case of \code{print}, \code{summary}, and
     \code{as.matrix}, or a series of objects of class \code{"DNAbin"} in
-    the case of \code{rbind} and \code{cbind}.}
+    the case of \code{rbind}, \code{cbind}, and \code{c}.}
   \item{printlen}{the number of labels to print (6 by default).}
   \item{digits}{the number of digits to print (3 by default).}
   \item{check.names}{a logical specifying whether to check the rownames
@@ -41,6 +42,7 @@
     standard R objects).}
   \item{drop}{logical; if \code{TRUE} (the default), the returned object
     is of the lowest possible dimension.}
+  \item{recursive}{for compatibility with the generic (unused).}
 }
 \details{
   These are all `methods' of generic functions which are here applied to