scanoneboot(cross, chr, pheno.col=1, model=c("normal","binary","2part","np"), method=c("em","imp","hk","ehk","mr","mr-imp","mr-argmax"), addcovar=NULL, intcovar=NULL, weights=NULL, use=c("all.obs", "complete.obs"), upper=FALSE, ties.random=FALSE, start=NULL, maxit=4000, tol=1e-4, n.boot=1000, verbose=FALSE)
cross
. See
read.cross
for details."mr"
), or by first filling in missing data
using a single imputation ("mr-imp"
) or by the Viterbi
algorithm ("mr-argmax"
).model="normal"
.NULL
, use the usual starting values; if
length 1, use random initial weights for EM; otherwise, this should
be a vector of length n+1 (where n is the number of possible
genotypes for the cross), giving the initial values for EM."em"
and
"ehk"
."em"
and "ehk"
.n.boot
, giving the estimated QTL locations
in the bootstrap replicates. The results for the original data are
included as an attribute, "results"
.
lodint
or bayesint
instead. The bulk of the arguments are the same as for the
scanone
function. A single chromosome should be
indicated with the chr
argument; otherwise, we focus on the
first chromosome in the input cross
object.
A single-dimensional scan on the relevant chromosome is performed. We further perform a nonparametric bootstrap (sampling individuals with replacement from the available data, to create a new data set with the same size as the input cross; some individuals with be duplicated and some omitted). The same scan is performed with the resampled data; for each bootstrap replicate, we store only the location with maximum LOD score.
Use summary.scanoneboot
to obtain the desired
confidence interval.
scanone
, summary.scanoneboot
,
plot.scanoneboot
,
lodint
, bayesint
data(fake.f2)
fake.f2 <- calc.genoprob(fake.f2, step=1, err=0.001)
## Not run: bootoutput <- scanoneboot(fake.f2, chr=13, method="hk")
plot(bootoutput)
summary(bootoutput)
Run the code above in your browser using DataLab