[Seqinr-commits] r1537 - pkg/man

[noreply at r-forge.r-project.org]

Author: lobry
Date: 2009-01-23 18:51:32 +0100 (Fri, 23 Jan 2009)
New Revision: 1537

Modified:
   pkg/man/read.abif.Rd
Log:
quality check

Modified: pkg/man/read.abif.Rd
===================================================================
--- pkg/man/read.abif.Rd	2009-01-23 08:56:39 UTC (rev 1536)
+++ pkg/man/read.abif.Rd	2009-01-23 17:51:32 UTC (rev 1537)
@@ -37,5 +37,9 @@
 \seealso{\code{\link{readBin}} which is used here to import the binary file and \code{\link{file.info}} to
 get the size of the file.}
 \examples{
-# An example is needed here (read a file and check with data(something)
+# Quality check:
+data(JLO)
+JLO.check <- read.abif(system.file("abif/2_FAC321_0000205983_B02_004.fsa", 
+  package = "seqinr"))
+stopifnot(identical(JLO, JLO.check))
 }