CHBJPTData {LDheatmap} | R Documentation |
CHBJPTSNP: Genotypes on 13 SNPs for 45 Chinese and 45 Japanese people
CHBJPTDist: Physical map positions of the 13 SNPs
data(CHBJPTData)
CHBJPTSNP: A dataframe of SNP genotypes. Each row represents an individual. Each column represents a SNP.
CHBJPTDist: a vector of integers, representing SNP physical map locations on the chromosome.
The data frame CHBJPTSNP
contains genotypes for 13 SNPs on chromosome
7, from 45 Chinese and 45 Japanese individuals. The Chinese individuals
were unrelated residents of the community at Beijing Normal University with
at least 3 Han Chinese grandparents. The Japanese individuals were unrelated
residents of the Tokyo metropolitan area with all grandparents from Japan.
The data are from release 21 of the International HapMap project
(The International HapMap Consortium 2005).
International HapMap Project www.hapmap.org
The International HapMap Consortium. A haplotype map of the human genome. Nature 437, 1299-1320. 2005.
data(CHBJPTData) #Now do our panel plot with LDheatmaps in the panels library(lattice) pop<-factor(c(rep("chinese", 45), rep("japanese", 45))) xyplot(1~1|pop,pch=" ", scales=list(draw=FALSE),xlab="",ylab="") trellis.focus("panel",1,1) LDheatmap(CHBJPTSNP[pop=="chinese",],CHBJPTDist,newpage=FALSE) trellis.focus("panel",2,1) LDheatmap(CHBJPTSNP[pop=="japanese",],CHBJPTDist,newpage=FALSE)