[Seqinr-commits] r2039 - pkg/man

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Mon Jul 3 13:21:21 CEST 2017


Author: jeanlobry
Date: 2017-07-03 13:21:21 +0200 (Mon, 03 Jul 2017)
New Revision: 2039

Modified:
   pkg/man/kaks.Rd
Log:
turning on again kaks test

Modified: pkg/man/kaks.Rd
===================================================================
--- pkg/man/kaks.Rd	2017-07-03 11:20:20 UTC (rev 2038)
+++ pkg/man/kaks.Rd	2017-07-03 11:21:21 UTC (rev 2039)
@@ -77,11 +77,11 @@
  data(AnoukResult)
  Anouk <- read.alignment(file = system.file("sequences/Anouk.fasta", package = "seqinr"),
   format = "fasta")	
-## if( ! all.equal(kaks(Anouk), AnoukResult) ) {
-##   warning("Poor numeric results with respect to AnoukResult standard")
-## } else {
-##   print("Results are consistent with AnoukResult standard")
-## }
+ if( ! all.equal(kaks(Anouk), AnoukResult) ) {
+   warning("Poor numeric results with respect to AnoukResult standard")
+ } else {
+   print("Results are consistent with AnoukResult standard")
+ }
 #
 # As from seqinR 2.0-3 the following alignment with out-of-frame gaps
 # should return a zero Ka value.



More information about the Seqinr-commits mailing list