[Genabel-commits] r1434 - in pkg/GenABEL: . R demo inst/unitTests man

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Fri Nov 29 09:39:50 CET 2013


Author: maksim
Date: 2013-11-29 09:39:49 +0100 (Fri, 29 Nov 2013)
New Revision: 1434

Modified:
   pkg/GenABEL/DESCRIPTION
   pkg/GenABEL/R/grammar.R
   pkg/GenABEL/demo/ge03d2.R
   pkg/GenABEL/demo/ge03d2ex.R
   pkg/GenABEL/demo/srdtawin.R
   pkg/GenABEL/inst/unitTests/runit.descriptives.trait.R
   pkg/GenABEL/inst/unitTests/runit.exports.R
   pkg/GenABEL/inst/unitTests/runit.iterator.R
   pkg/GenABEL/inst/unitTests/runit.merge.R
   pkg/GenABEL/inst/unitTests/runit.mmscore.R
   pkg/GenABEL/inst/unitTests/runit.polygenic.R
   pkg/GenABEL/inst/unitTests/runit.polylik.R
   pkg/GenABEL/inst/unitTests/runit.recodeChromosome.R
   pkg/GenABEL/inst/unitTests/runit.strandModify.R
   pkg/GenABEL/man/HWE.show.Rd
   pkg/GenABEL/man/PGC.Rd
   pkg/GenABEL/man/VIFGC.Rd
   pkg/GenABEL/man/VIFGC_ovdom.Rd
   pkg/GenABEL/man/Xfix.Rd
   pkg/GenABEL/man/add.phdata.Rd
   pkg/GenABEL/man/add.plot.Rd
   pkg/GenABEL/man/as.character.gwaa.data.Rd
   pkg/GenABEL/man/as.character.snp.coding.Rd
   pkg/GenABEL/man/as.character.snp.data.Rd
   pkg/GenABEL/man/as.character.snp.strand.Rd
   pkg/GenABEL/man/as.data.frame.gwaa.data.Rd
   pkg/GenABEL/man/as.double.gwaa.data.Rd
   pkg/GenABEL/man/as.double.snp.data.Rd
   pkg/GenABEL/man/as.genotype.Rd
   pkg/GenABEL/man/as.genotype.gwaa.data.Rd
   pkg/GenABEL/man/as.genotype.snp.data.Rd
   pkg/GenABEL/man/as.hsgeno.Rd
   pkg/GenABEL/man/as.hsgeno.gwaa.data.Rd
   pkg/GenABEL/man/as.hsgeno.snp.data.Rd
   pkg/GenABEL/man/autosomal.Rd
   pkg/GenABEL/man/blurGenotype.Rd
   pkg/GenABEL/man/catable.Rd
   pkg/GenABEL/man/ccfast.Rd
   pkg/GenABEL/man/check.marker-class.Rd
   pkg/GenABEL/man/check.marker.Rd
   pkg/GenABEL/man/check.trait.Rd
   pkg/GenABEL/man/cocohet.Rd
   pkg/GenABEL/man/crnames.Rd
   pkg/GenABEL/man/del.phdata.Rd
   pkg/GenABEL/man/descriptives.marker.Rd
   pkg/GenABEL/man/descriptives.scan.Rd
   pkg/GenABEL/man/descriptives.trait.Rd
   pkg/GenABEL/man/dprfast.Rd
   pkg/GenABEL/man/egscore.Rd
   pkg/GenABEL/man/emp.ccfast.Rd
   pkg/GenABEL/man/emp.qtscore.Rd
   pkg/GenABEL/man/estlambda.Rd
   pkg/GenABEL/man/export.impute.Rd
   pkg/GenABEL/man/findRelatives.Rd
   pkg/GenABEL/man/formetascore.Rd
   pkg/GenABEL/man/getLogLikelihoodGivenRelation.Rd
   pkg/GenABEL/man/grammar.Rd
   pkg/GenABEL/man/gwaa.data-class.Rd
   pkg/GenABEL/man/hom.Rd
   pkg/GenABEL/man/hom.old.Rd
   pkg/GenABEL/man/ibs.Rd
   pkg/GenABEL/man/ibs.old.Rd
   pkg/GenABEL/man/merge.gwaa.data.Rd
   pkg/GenABEL/man/merge.snp.data.Rd
   pkg/GenABEL/man/mlreg.Rd
   pkg/GenABEL/man/mlreg.p.Rd
   pkg/GenABEL/man/mmscore.Rd
   pkg/GenABEL/man/patch_strand.Rd
   pkg/GenABEL/man/perid.summary.Rd
   pkg/GenABEL/man/plot.check.marker.Rd
   pkg/GenABEL/man/plot.scan.gwaa.2D.Rd
   pkg/GenABEL/man/plot.scan.gwaa.Rd
   pkg/GenABEL/man/polygenic.Rd
   pkg/GenABEL/man/polygenic_hglm.Rd
   pkg/GenABEL/man/qtscore.Rd
   pkg/GenABEL/man/qvaluebh95.Rd
   pkg/GenABEL/man/r2fast.Rd
   pkg/GenABEL/man/r2fast.old.Rd
   pkg/GenABEL/man/recodeChromosome.Rd
   pkg/GenABEL/man/redundant.Rd
   pkg/GenABEL/man/rhofast.Rd
   pkg/GenABEL/man/scan.glm.2D.Rd
   pkg/GenABEL/man/scan.glm.Rd
   pkg/GenABEL/man/scan.gwaa-class.Rd
   pkg/GenABEL/man/scan.gwaa.2D-class.Rd
   pkg/GenABEL/man/scan.haplo.2D.Rd
   pkg/GenABEL/man/scan.haplo.Rd
   pkg/GenABEL/man/snp.coding-class.Rd
   pkg/GenABEL/man/snp.data-class.Rd
   pkg/GenABEL/man/snp.names.Rd
   pkg/GenABEL/man/snp.strand-class.Rd
   pkg/GenABEL/man/snp.subset.Rd
   pkg/GenABEL/man/summary.check.marker.Rd
   pkg/GenABEL/man/summary.gwaa.data.Rd
   pkg/GenABEL/man/summary.scan.gwaa.Rd
   pkg/GenABEL/man/summary.snp.data.Rd
   pkg/GenABEL/man/ztransform.Rd
Log:
Because most of the data are moved to a new package called GenABEL.data, I Added require(GenABEL.data) line every where data() calls GenABEL data.

Modified: pkg/GenABEL/DESCRIPTION
===================================================================
--- pkg/GenABEL/DESCRIPTION	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/DESCRIPTION	2013-11-29 08:39:49 UTC (rev 1434)
@@ -6,9 +6,9 @@
 Author: GenABEL project developers
 Contact: GenABEL project developers <genabel.project at gmail.com>
 Maintainer: Yurii Aulchenko <yurii at bionet.nsc.ru>
-Depends: R (>= 2.15.0), methods, MASS, utils, GenABEL.data
+Depends: R (>= 2.15.0), methods, MASS, utils
 Suggests: qvalue, genetics, haplo.stats, DatABEL (>= 0.9-0), 
-	hglm, MetABEL, PredictABEL, VariABEL, bigRR
+	hglm, MetABEL, PredictABEL, VariABEL, bigRR, GenABEL.data
 Description: a package for genome-wide association analysis between 
              quantitative or binary traits and single-nucleotide
              polymorphisms (SNPs). 

Modified: pkg/GenABEL/R/grammar.R
===================================================================
--- pkg/GenABEL/R/grammar.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/R/grammar.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -51,6 +51,7 @@
 #'
 #' @examples
 #' # Using clean ge03d2 data
+#' require(GenABEL.data)
 #' data(ge03d2.clean)
 #' # take only a small piece for speed
 #' ge03d2.clean <- ge03d2.clean[1:200,]

Modified: pkg/GenABEL/demo/ge03d2.R
===================================================================
--- pkg/GenABEL/demo/ge03d2.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/demo/ge03d2.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -7,6 +7,7 @@
 ###################
 
 ?"LOAD THE DATA"
+require(GenABEL.data)
 data(ge03d2)
 
 ?"ATTACH PHENOTYPIC DATA"
@@ -232,6 +233,7 @@
 top10 <- rownames(descriptives.scan(an4.sa,sort="Pc1df"))
 top10
 ?"TRY TO REPLICATE IN THE SMALL DATA SET"
+require(GenABEL.data)
 data(ge03d2c)
 confirm <- qtscore(dm2~sex+age,ge03d2c[,top10])
 descriptives.scan(confirm)

Modified: pkg/GenABEL/demo/ge03d2ex.R
===================================================================
--- pkg/GenABEL/demo/ge03d2ex.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/demo/ge03d2ex.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -7,6 +7,7 @@
 ###################
 
 ?"LOAD THE DATA"
+require(GenABEL.data)
 data(ge03d2ex)
 
 ?"ATTACH PHENOTYPIC DATA"
@@ -232,6 +233,7 @@
 top10 <- rownames(descriptives.scan(an4.sa,sort="Pc1df"))
 top10
 ?"TRY TO REPLICATE IN THE SMALL DATA SET"
+require(GenABEL.data)
 data(ge03d2c)
 confirm <- qtscore(dm2~sex+age,ge03d2c[,top10])
 descriptives.scan(confirm)

Modified: pkg/GenABEL/demo/srdtawin.R
===================================================================
--- pkg/GenABEL/demo/srdtawin.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/demo/srdtawin.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -1,7 +1,7 @@
 #
 # loading the data
 #
-
+require(GenABEL.data)
 data(srdta)
 
 #

Modified: pkg/GenABEL/inst/unitTests/runit.descriptives.trait.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.descriptives.trait.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.descriptives.trait.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.descriptives.trait <- function()
 {
+  	require(GenABEL.data)
     data(ge03d2ex)
 # this works
     descriptives.trait(ge03d2ex,by.var=phdata(ge03d2ex)$sex)

Modified: pkg/GenABEL/inst/unitTests/runit.exports.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.exports.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.exports.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.exports <- function()
 {
+  require(GenABEL.data)
   data(ge03d2.clean)
   nTestIds <- sample(c(10:min(100, nids(ge03d2.clean))), 1)
   nTestSnps <- sample(c(10:min(1000, nsnps(ge03d2.clean))), 1)
@@ -92,7 +93,8 @@
 
 test.export.merlin.bug2525 <- function()
 {
-  data(srdta)
+  require(GenABEL.data)
+	data(srdta)
   export.merlin(
     srdta[, 1:2], dpieceFun="new",
     mapfile="tmpNew.map", pedfile="tmpNew.ped", datafile="tmpNew.dat"
@@ -112,7 +114,8 @@
 
 
 test.export.merlin.bug2664 <- function() {
-  data(srdta)
+  require(GenABEL.data)
+	data(srdta)
   export.merlin(
     srdta[1:200, 1:10], dpieceFun="new",
     mapfile="tmp.s1.map", pedfile="tmp.s1.ped", datafile="tmp.s1.dat",

Modified: pkg/GenABEL/inst/unitTests/runit.iterator.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.iterator.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.iterator.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -20,6 +20,7 @@
 
 test.summary_snp_data <- function()
 {
+  require(GenABEL.data)
 	data(ge03d2)
 	srdta <- ge03d2 #[,autosomal(ge03d2)]
 	

Modified: pkg/GenABEL/inst/unitTests/runit.merge.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.merge.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.merge.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,8 @@
 
 test.merge.bug1641 <- function()
 {
+	
+  require(GenABEL.data)
 	data(srdta)
 	x1 <- srdta[1:4,1]
 	x2 <- srdta[5:10, 2]
@@ -30,6 +32,7 @@
 
 test.merge.bug1676 <- function() 
 {
+  require(GenABEL.data)
 	data(srdta)
 	x1 <- srdta[1:4,1]
 	x2 <- srdta[5:10, 2]

Modified: pkg/GenABEL/inst/unitTests/runit.mmscore.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.mmscore.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.mmscore.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.mmscore <- function()
 {
+  require(GenABEL.data)
 	data(ge03d2.clean)
 	dta <- ge03d2.clean[1:200,autosomal(ge03d2.clean)[1:3000]]
 	gkin <- ibs(dta[,1:2000],w="freq")

Modified: pkg/GenABEL/inst/unitTests/runit.polygenic.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.polygenic.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.polygenic.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.polygenic.Bug1322 <- function()
 {
+  require(GenABEL.data)
 	data(ge03d2.clean)
 	df <- ge03d2.clean[1:200,autosomal(ge03d2.clean)]
 	gkin <- ibs(df,w="freq")
@@ -50,6 +51,7 @@
 
 test.polygenic.eigenOfRel <- function()
 {
+  require(GenABEL.data)
 	data(ge03d2.clean)
 	completeIds <- complete.cases(phdata(ge03d2.clean)[,c("height","sex","age")])
 	df <- ge03d2.clean[sample(which(completeIds),250),autosomal(ge03d2.clean)]

Modified: pkg/GenABEL/inst/unitTests/runit.polylik.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.polylik.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.polylik.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.polylik <- function(tol = 2*.Machine$double.eps^0.5)
 {
+  	require(GenABEL.data)
     data(ge03d2.clean)
     df <- ge03d2.clean[1:150,autosomal(ge03d2.clean)]
     gkin <- ibs(df,w="freq")
@@ -47,4 +48,4 @@
     checkEquals(h2htNew$pgresidualY,h2htOld$pgresidualY, tolerance = tol)
     checkEquals(h2htNew$InvSigma,h2htOld$InvSigma, tolerance = tol)
     checkEquals(h2htNew$measuredIDs,h2htOld$measuredIDs, tolerance = tol)
-}
\ No newline at end of file
+}

Modified: pkg/GenABEL/inst/unitTests/runit.recodeChromosome.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.recodeChromosome.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.recodeChromosome.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.recodeChromosome <- function()
 {
+  require(GenABEL.data)
 	data(ge03d2ex)
 	lst <- list("3"="X","2"=15)
 	dta0 <- chromosome(recodeChromosome(ge03d2ex,lst))
@@ -41,4 +42,4 @@
 	checkException( dta <- recodeChromosome(ge03d2ex,lst) )
 	lst <- list("1"="0","2"=c())
 	checkException( dta <- recodeChromosome(ge03d2ex,lst) )
-}
\ No newline at end of file
+}

Modified: pkg/GenABEL/inst/unitTests/runit.strandModify.R
===================================================================
--- pkg/GenABEL/inst/unitTests/runit.strandModify.R	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/inst/unitTests/runit.strandModify.R	2013-11-29 08:39:49 UTC (rev 1434)
@@ -22,6 +22,7 @@
 
 test.strandModify <- function()
 {
+  require(GenABEL.data)
 	data(ge03d2ex)
 	str <- strand(ge03d2ex)
 	dta1 <- ge03d2ex
@@ -36,4 +37,4 @@
 	checkIdentical(dta2,ge03d2ex)
 	table(strand(dta1),strand(ge03d2ex))
 	table(strand(dta2),strand(ge03d2ex))
-}
\ No newline at end of file
+}

Modified: pkg/GenABEL/man/HWE.show.Rd
===================================================================
--- pkg/GenABEL/man/HWE.show.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/HWE.show.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -26,6 +26,7 @@
 \code{\link{check.marker}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 mc <- check.marker(srdta,p.lev=0.01,ibs.mrk=0)
 mc$nohwe

Modified: pkg/GenABEL/man/PGC.Rd
===================================================================
--- pkg/GenABEL/man/PGC.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/PGC.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -56,6 +56,7 @@
   ks.test or group regress.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2)
 ge03d2 <- ge03d2[seq(from=1,to=nids(ge03d2),by=2),seq(from=1,to=nsnps(ge03d2),by=3)]
 qts <- mlreg(dm2~1,data=ge03d2,gtmode = "additive")

Modified: pkg/GenABEL/man/VIFGC.Rd
===================================================================
--- pkg/GenABEL/man/VIFGC.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/VIFGC.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -69,6 +69,7 @@
   and ks.test.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2)
 # truncate the data to make the example faster
 ge03d2 <- ge03d2[seq(from=1,to=nids(ge03d2),by=2),seq(from=1,to=nsnps(ge03d2),by=3)]

Modified: pkg/GenABEL/man/VIFGC_ovdom.Rd
===================================================================
--- pkg/GenABEL/man/VIFGC_ovdom.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/VIFGC_ovdom.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -51,6 +51,7 @@
   error functions: regress, median and ks.test.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2)
 # truncate the data to make the example faster
 ge03d2 <- ge03d2[seq(from=1,to=nids(ge03d2),by=2),seq(from=1,to=nsnps(ge03d2),by=3)]

Modified: pkg/GenABEL/man/Xfix.Rd
===================================================================
--- pkg/GenABEL/man/Xfix.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/Xfix.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
 \code{\link{check.marker}}
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2c)
 # truncate the data to make the example faster
 ge03d2c <- ge03d2c[seq(from=1,to=nids(ge03d2c),by=2),seq(from=1,to=nsnps(ge03d2c),by=2)]

Modified: pkg/GenABEL/man/add.phdata.Rd
===================================================================
--- pkg/GenABEL/man/add.phdata.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/add.phdata.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -37,6 +37,7 @@
   'name' argument
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 # take a small subset for this example
 srdta <- srdta[1:10,1:5]

Modified: pkg/GenABEL/man/add.plot.Rd
===================================================================
--- pkg/GenABEL/man/add.plot.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/add.plot.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -38,6 +38,7 @@
 	\code{\link{scan.glm.2D}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 a <- ccfast("bt",srdta,snps=c(1:100))
 plot(a)

Modified: pkg/GenABEL/man/as.character.gwaa.data.Rd
===================================================================
--- pkg/GenABEL/man/as.character.gwaa.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.character.gwaa.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -30,6 +30,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.character(srdta[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.character.snp.coding.Rd
===================================================================
--- pkg/GenABEL/man/as.character.snp.coding.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.character.snp.coding.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -30,6 +30,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.character(srdta at gtdata@coding[1:5])
 }

Modified: pkg/GenABEL/man/as.character.snp.data.Rd
===================================================================
--- pkg/GenABEL/man/as.character.snp.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.character.snp.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -28,6 +28,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.character(srdta at gtdata[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.character.snp.strand.Rd
===================================================================
--- pkg/GenABEL/man/as.character.snp.strand.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.character.snp.strand.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -30,6 +30,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.character(srdta at gtdata@strand[1:5])
 }

Modified: pkg/GenABEL/man/as.data.frame.gwaa.data.Rd
===================================================================
--- pkg/GenABEL/man/as.data.frame.gwaa.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.data.frame.gwaa.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -28,6 +28,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.data.frame(srdta[1:5,])
 }

Modified: pkg/GenABEL/man/as.double.gwaa.data.Rd
===================================================================
--- pkg/GenABEL/man/as.double.gwaa.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.double.gwaa.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.double(srdta[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.double.snp.data.Rd
===================================================================
--- pkg/GenABEL/man/as.double.snp.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.double.snp.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -27,6 +27,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.double(srdta at gtdata[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.genotype.Rd
===================================================================
--- pkg/GenABEL/man/as.genotype.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.genotype.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.genotype(srdta at gtdata[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.genotype.gwaa.data.Rd
===================================================================
--- pkg/GenABEL/man/as.genotype.gwaa.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.genotype.gwaa.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.genotype(srdta[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.genotype.snp.data.Rd
===================================================================
--- pkg/GenABEL/man/as.genotype.snp.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.genotype.snp.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -27,6 +27,7 @@
 \code{\link{as.hsgeno}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.genotype(srdta at gtdata[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.hsgeno.Rd
===================================================================
--- pkg/GenABEL/man/as.hsgeno.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.hsgeno.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -28,6 +28,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.hsgeno(srdta[1:5,1:3])
 as.hsgeno(srdta at gtdata[1:5,1:3])

Modified: pkg/GenABEL/man/as.hsgeno.gwaa.data.Rd
===================================================================
--- pkg/GenABEL/man/as.hsgeno.gwaa.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.hsgeno.gwaa.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.hsgeno(srdta[1:5,1:10])
 }

Modified: pkg/GenABEL/man/as.hsgeno.snp.data.Rd
===================================================================
--- pkg/GenABEL/man/as.hsgeno.snp.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/as.hsgeno.snp.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -27,6 +27,7 @@
 \code{\link{as.genotype.snp.data}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.hsgeno(srdta at gtdata[1:5,1:10])
 }

Modified: pkg/GenABEL/man/autosomal.Rd
===================================================================
--- pkg/GenABEL/man/autosomal.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/autosomal.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -25,6 +25,7 @@
 %}
 %\seealso{ ~~objects to See Also as \code{\link{help}}, ~~~ }
 \examples{
+	require(GenABEL.data)
 	data(ge03d2)
 	autosomal(ge03d2)[1:10]
 }

Modified: pkg/GenABEL/man/blurGenotype.Rd
===================================================================
--- pkg/GenABEL/man/blurGenotype.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/blurGenotype.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
   epsilon*(1-epsilon), and both allelel differ = epsilon^2.
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 # select 10 first SNPs
 df <- srdta[,1:10]

Modified: pkg/GenABEL/man/catable.Rd
===================================================================
--- pkg/GenABEL/man/catable.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/catable.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -31,6 +31,7 @@
 	\code{\link{perid.summary}}
 }
 \examples{
+	require(GenABEL.data)
 	data(srdta)
 	callr <- summary(srdta at gtdata)[,"CallRate"]
 	catable(callr,c(0.93,0.95,0.99))

Modified: pkg/GenABEL/man/ccfast.Rd
===================================================================
--- pkg/GenABEL/man/ccfast.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/ccfast.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -44,6 +44,7 @@
 \code{\link{scan.gwaa-class}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 a <- ccfast("bt",data=srdta,snps=c(1:10),ids=c(1:100))
 a

Modified: pkg/GenABEL/man/check.marker-class.Rd
===================================================================
--- pkg/GenABEL/man/check.marker-class.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/check.marker-class.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -50,6 +50,7 @@
 \code{\link{plot.check.marker}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 mc <- check.marker(data=srdta at gtdata[,1:100],redundant="all",maf=0.01,
 					minconcordance=0.9,fdr=.1,ibs.mrk=0)

Modified: pkg/GenABEL/man/check.marker.Rd
===================================================================
--- pkg/GenABEL/man/check.marker.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/check.marker.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -98,6 +98,7 @@
 }
 \examples{
 # usual way
+require(GenABEL.data)
 data(ge03d2c)
 # truncate the data to make the example faster
 ge03d2c <- ge03d2c[seq(from=1,to=nids(ge03d2c),by=2),seq(from=1,to=nsnps(ge03d2c),by=2)]
@@ -115,6 +116,7 @@
 # ready to use fixed1 for analysis
 
 # let us look into redundancy
+require(GenABEL.data)
 data(srdta)
 mc <- check.marker(data=srdta,ids=c(1:300),call=.92,perid.call=.92)
 names(mc)

Modified: pkg/GenABEL/man/check.trait.Rd
===================================================================
--- pkg/GenABEL/man/check.trait.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/check.trait.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -39,6 +39,7 @@
 	\code{\link{check.marker}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 check.trait("qt3",data=srdta)
 n <- names(srdta at phdata)

Modified: pkg/GenABEL/man/cocohet.Rd
===================================================================
--- pkg/GenABEL/man/cocohet.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/cocohet.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -71,6 +71,7 @@
   choosen in the input parameter test is performed.
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 chis2_nocorrection <- cocohet(data=gtdata(srdta),
 trait=phdata(srdta)$bt, window=3, test="CHI2")

Modified: pkg/GenABEL/man/crnames.Rd
===================================================================
--- pkg/GenABEL/man/crnames.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/crnames.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -20,6 +20,7 @@
 %\references{
 %}
 \examples{
+	require(GenABEL.data)
 	data(ge03d2ex)
 	a <- as.numeric(ge03d2ex[1:20,1:3])
 	crnames(dimnames(a),a==1)

Modified: pkg/GenABEL/man/del.phdata.Rd
===================================================================
--- pkg/GenABEL/man/del.phdata.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/del.phdata.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -21,6 +21,7 @@
   \code{\link{gwaa.data-class}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 phdata(srdta)[1:5,]
 srdta <- del.phdata(srdta,"qt1")

Modified: pkg/GenABEL/man/descriptives.marker.Rd
===================================================================
--- pkg/GenABEL/man/descriptives.marker.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/descriptives.marker.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -32,6 +32,7 @@
 %\seealso{
 %}
 \examples{
+	require(GenABEL.data)
 	data(srdta)
 	descriptives.marker(srdta)
 }

Modified: pkg/GenABEL/man/descriptives.scan.Rd
===================================================================
--- pkg/GenABEL/man/descriptives.scan.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/descriptives.scan.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -26,6 +26,7 @@
 %\seealso{
 %}
 \examples{
+	require(GenABEL.data)
 	data(srdta)
 	x <- qtscore(qt2,srdta)
 	descriptives.scan(x)

Modified: pkg/GenABEL/man/descriptives.trait.Rd
===================================================================
--- pkg/GenABEL/man/descriptives.trait.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/descriptives.trait.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -30,6 +30,7 @@
 %\seealso{
 %}
 \examples{
+	require(GenABEL.data)
 	data(srdta)
 	descriptives.trait(srdta)
 	descriptives.trait(srdta,by.var=srdta at phdata$sex)

Modified: pkg/GenABEL/man/dprfast.Rd
===================================================================
--- pkg/GenABEL/man/dprfast.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/dprfast.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -32,6 +32,7 @@
 \code{\link{rhofast}}
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2)
 # D's using D'fast
 a <- dprfast(ge03d2,snps=c(1:10))

Modified: pkg/GenABEL/man/egscore.Rd
===================================================================
--- pkg/GenABEL/man/egscore.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/egscore.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -86,6 +86,7 @@
   This test is defined only for 1 d.f.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2c)
 #egscore with stratification
 gkin <- ibs(ge03d2c[,autosomal(ge03d2c)],w="freq")

Modified: pkg/GenABEL/man/emp.ccfast.Rd
===================================================================
--- pkg/GenABEL/man/emp.ccfast.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/emp.ccfast.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -51,6 +51,7 @@
 \code{\link{scan.gwaa-class}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 a<-ccfast("bt",data=srdta,snps=c(500:800))
 plot(a)

Modified: pkg/GenABEL/man/emp.qtscore.Rd
===================================================================
--- pkg/GenABEL/man/emp.qtscore.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/emp.qtscore.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -59,6 +59,7 @@
 \code{\link{scan.gwaa-class}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 a<-qtscore(qt3~age+sex,data=srdta,snps=c(1:200))
 plot(a)

Modified: pkg/GenABEL/man/estlambda.Rd
===================================================================
--- pkg/GenABEL/man/estlambda.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/estlambda.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -45,6 +45,7 @@
   fit by use of Kolmogorov-Smirnov test)
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 pex <- summary(gtdata(srdta))[,"Pexact"]
 estlambda(pex, plot=TRUE)

Modified: pkg/GenABEL/man/export.impute.Rd
===================================================================
--- pkg/GenABEL/man/export.impute.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/export.impute.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -44,6 +44,7 @@
 }
 \examples{
 \dontrun{
+require(GenABEL.data)
 data(srdta)
 export.impute(srdta[1:50,1:3])
 }

Modified: pkg/GenABEL/man/findRelatives.Rd
===================================================================
--- pkg/GenABEL/man/findRelatives.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/findRelatives.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -109,6 +109,7 @@
   parameter.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2.clean)
 df <- ge03d2.clean[,autosomal(ge03d2.clean)]
 df <- df[,sort(sample(1:nsnps(df),1000))]

Modified: pkg/GenABEL/man/formetascore.Rd
===================================================================
--- pkg/GenABEL/man/formetascore.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/formetascore.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -56,6 +56,7 @@
 %}
 \seealso{\code{\link{ztransform}},\code{\link{qtscore}}}
 \examples{
+	require(GenABEL.data)
 	data(ge03d2c)
 	x <- formetascore(bmi ~ sex+age,ge03d2c)
 	x[1:10,]

Modified: pkg/GenABEL/man/getLogLikelihoodGivenRelation.Rd
===================================================================
--- pkg/GenABEL/man/getLogLikelihoodGivenRelation.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/getLogLikelihoodGivenRelation.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -21,6 +21,7 @@
   returned with 'makeTransitionMatrix').
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 # select 10 first SNPs
 df <- srdta[,1:10]

Modified: pkg/GenABEL/man/grammar.Rd
===================================================================
--- pkg/GenABEL/man/grammar.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/grammar.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -50,6 +50,7 @@
 }
 \examples{
 # Using clean ge03d2 data
+require(GenABEL.data)
 data(ge03d2.clean)
 # take only a small piece for speed
 ge03d2.clean <- ge03d2.clean[1:200,]

Modified: pkg/GenABEL/man/gwaa.data-class.Rd
===================================================================
--- pkg/GenABEL/man/gwaa.data-class.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/gwaa.data-class.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -49,6 +49,7 @@
 	\code{\link{snp.mx-class}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 srdta at phdata[1:10,]
 srdta at gtdata[1:10,1:12]

Modified: pkg/GenABEL/man/hom.Rd
===================================================================
--- pkg/GenABEL/man/hom.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/hom.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -83,6 +83,7 @@
   when estimating inbreeding/variance from marker data.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2)
 h <- hom(ge03d2[,c(1:100)])
 h[1:5,]

Modified: pkg/GenABEL/man/hom.old.Rd
===================================================================
--- pkg/GenABEL/man/hom.old.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/hom.old.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -63,6 +63,7 @@
 \code{\link{snp.data-class}}
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2)
 h <- hom(ge03d2[,c(1:100)])
 homsem <- h[,"Hom"]*(1-h[,"Hom"])/h[,"NoMeasured"]

Modified: pkg/GenABEL/man/ibs.Rd
===================================================================
--- pkg/GenABEL/man/ibs.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/ibs.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -79,6 +79,7 @@
   people.
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2c)
 set.seed(7)
 # compute IBS based on a random sample of 1000 autosomal marker

Modified: pkg/GenABEL/man/ibs.old.Rd
===================================================================
--- pkg/GenABEL/man/ibs.old.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/ibs.old.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -55,6 +55,7 @@
 \code{\link{snp.data-class}}
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2c)
 a <- ibs(data=ge03d2c,ids=c(1:10),snps=c(1:1000))
 a

Modified: pkg/GenABEL/man/merge.gwaa.data.Rd
===================================================================
--- pkg/GenABEL/man/merge.gwaa.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/merge.gwaa.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -32,6 +32,7 @@
 	\code{\link{add.phdata}}
 }
 \examples{
+	require(GenABEL.data)
 	data(srdta)
 	x1 <- srdta[c(1,3,5,6),c(2,4,5,6)]
 	x2 <- srdta[c(2,4,5,6),c(1,3,5,6)]

Modified: pkg/GenABEL/man/merge.snp.data.Rd
===================================================================
--- pkg/GenABEL/man/merge.snp.data.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/merge.snp.data.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -76,6 +76,7 @@
 	\code{\link{add.phdata}}
 }
 \examples{
+	require(GenABEL.data)
 	data(srdta)
 	x1 <- srdta[c(1,3,5,6),c(2,4,5,6)]@gtdata
 	x2 <- srdta[c(2,4,5,6),c(1,3,5,6)]@gtdata

Modified: pkg/GenABEL/man/mlreg.Rd
===================================================================
--- pkg/GenABEL/man/mlreg.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/mlreg.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -44,6 +44,7 @@
 \code{\link{qtscore}}
 }
 \examples{
+	require(GenABEL.data)
 	data(ge03d2)
 	dta <- ge03d2[,1:100]
 # analysis using linear model

Modified: pkg/GenABEL/man/mlreg.p.Rd
===================================================================
--- pkg/GenABEL/man/mlreg.p.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/mlreg.p.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -41,6 +41,7 @@
 \code{\link{qtscore}}
 }
 \examples{
+	require(GenABEL.data)
 	data(ge03d2)
 	dta <- ge03d2[,1:100]
 # analysis using linear model

Modified: pkg/GenABEL/man/mmscore.Rd
===================================================================
--- pkg/GenABEL/man/mmscore.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/mmscore.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -72,6 +72,7 @@
 \examples{
 # ge03d2 is rather bad data set to demonstrate, 
 # because this is a population-based study
+require(GenABEL.data)
 data(ge03d2.clean)
 #take half for speed
 ge03d2.clean <- ge03d2.clean[1:100,]

Modified: pkg/GenABEL/man/patch_strand.Rd
===================================================================
--- pkg/GenABEL/man/patch_strand.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/patch_strand.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -28,6 +28,7 @@
 %	\code{\link{export.merlin}}.
 %}
 \examples{
+require(GenABEL.data)
 data(srdta)
 as.character(srdta at gtdata@strand[1:20])
 a <- patch_strand(srdta,srdta at gtdata@snpnames[1:10],rep("+",10))

Modified: pkg/GenABEL/man/perid.summary.Rd
===================================================================
--- pkg/GenABEL/man/perid.summary.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/perid.summary.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -35,6 +35,7 @@
 \code{\link{snp.data-class}}
 }
 \examples{
+require(GenABEL.data)
 data(ge03d2c)
 a <- perid.summary(data=ge03d2c,snps=c(1:100),ids=c(1:10))
 a

Modified: pkg/GenABEL/man/plot.check.marker.Rd
===================================================================
--- pkg/GenABEL/man/plot.check.marker.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/plot.check.marker.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -38,6 +38,7 @@
 	\code{\link{snp.subset}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 mc <- check.marker(data=srdta at gtdata[,1:100],redundant="all",maf=0.01,
 					minconcordance=0.9,fdr=.1,ibs.mrk=0)

Modified: pkg/GenABEL/man/plot.scan.gwaa.2D.Rd
===================================================================
--- pkg/GenABEL/man/plot.scan.gwaa.2D.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/plot.scan.gwaa.2D.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -33,6 +33,7 @@
 	\code{\link{scan.haplo.2D}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 a <- scan.glm.2D("qt3~CRSNP",data=srdta,snps=c(1:10))
 # "allelic" results

Modified: pkg/GenABEL/man/plot.scan.gwaa.Rd
===================================================================
--- pkg/GenABEL/man/plot.scan.gwaa.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/plot.scan.gwaa.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -42,6 +42,7 @@
 	\code{\link{scan.haplo}}
 }
 \examples{
+require(GenABEL.data)
 data(srdta)
 a <- qtscore(bt,srdta,snps=c(1:250))
 plot(a)

Modified: pkg/GenABEL/man/polygenic.Rd
===================================================================
--- pkg/GenABEL/man/polygenic.Rd	2013-11-28 19:48:57 UTC (rev 1433)
+++ pkg/GenABEL/man/polygenic.Rd	2013-11-29 08:39:49 UTC (rev 1434)
@@ -178,6 +178,7 @@
 }
 \examples{
 # note that procedure runs on CLEAN data
+require(GenABEL.data)
 data(ge03d2ex.clean)
 gkin <- ibs(ge03d2ex.clean,w="freq")
 h2ht <- polygenic(height ~ sex + age, kin=gkin, ge03d2ex.clean)

[TRUNCATED]

To get the complete diff run:
    svnlook diff /svnroot/genabel -r 1434


More information about the Genabel-commits mailing list