subset_scan1: Subset scan1 output

In rqtl/qtl2scan: Genome Scans for QTL Experiments

Description

Subset the output of scan1() by chromosome or column

Usage

subset_scan1(x, map = NULL, chr = NULL, lodcolumn = NULL, ...)

## S3 method for class 'scan1'
subset(x, map = NULL, chr = NULL, lodcolumn = NULL, ...)

Arguments

x	An object of class "scan1" as returned by scan1().
map	A list of vectors of marker positions, as produced by qtl2geno::insert_pseudomarkers().
chr	Vector of chromosomes.
lodcolumn	Vector of integers or character strings indicating the LOD score columns, either as a numeric indexes or column names.
...	Ignored

Value

Object of same form as input, but subset by chromosome and/or column.

Examples

## Not run: 
# load qtl2geno package for data and genoprob calculation
library(qtl2geno)

# read data
iron <- read_cross2(system.file("extdata", "iron.zip", package="qtl2geno"))

# insert pseudomarkers into map
map <- insert_pseudomarkers(iron$gmap, step=1)

# calculate genotype probabilities
probs <- calc_genoprob(iron, map, error_prob=0.002)

# grab phenotypes and covariates; ensure that covariates have names attribute
pheno <- iron$pheno
covar <- match(iron$covar$sex, c("f", "m")) # make numeric
names(covar) <- rownames(iron$covar)
Xcovar <- get_x_covar(iron)

# perform genome scan
out <- scan1(probs, pheno, addcovar=covar, Xcovar=Xcovar)

# pull out chromosome 8
out_c8 <- subset(out, map, chr="8")

# just the second column on chromosome 2
out_c2_spleen <- subset(out, map, "2", "spleen")

# all positions, but just the "liver" column
out_spleen <- subset(out, map, lodcolumn="spleen")

## End(Not run)

rqtl/qtl2scan documentation built on May 28, 2019, 2:36 a.m.