various changes and fixes

[ape.git] / R / write.nexus.data.R

diff --git a/R/write.nexus.data.R b/R/write.nexus.data.R
index b165e4234235d99e6d2ff0a6026b5e1ceae7ceef..deae1f80eac01ce6bac7b970e4ea2b41261c34c8 100644 (file)
--- a/R/write.nexus.data.R
+++ b/R/write.nexus.data.R
@@ -126,7 +126,7 @@
         fcat("BEGIN DATA;\n")
         fcat(indent,"DIMENSIONS", " ", NTAX, " ", NCHAR, ";\n")
         if (format %in% c("dna", "protein")) {
-            fcat(indent, "FORMAT", " ", MISSING, " ", GAP, " ", DATATYPE, " ", INTERLEAVE, ";\n")
+            fcat(indent, "FORMAT", " ", DATATYPE, " ", MISSING, " ", GAP, " ", INTERLEAVE, ";\n") # from François Michonneau (2009-10-02)
         }
         fcat(indent,"MATRIX\n")
         print.matrix(x)