Description Usage Arguments Value Author(s) Examples
Imputation of missing genotypes in the framework
1 | hapiImupte(gmt, nSPT = 2, allowNA = 0)
|
gmt |
a dataframe of genotype data of gamete cells in the framework |
nSPT |
a numeric value of the minumum number of supports for an imputation |
allowNA |
a numeric value of the maximum number of gametes with NA at a locus |
a dataframe of imputed genotypes in the framework
Ruidong Li
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | ref <- rep(0,500)
alt <- rep(1,500)
gmtFrame <- data.frame(gmt1=ref, gmt2=alt, gmt3=ref,
gmt4=ref, gmt5=c(alt[1:250], ref[251:500]),
stringsAsFactors = FALSE)
idx1 <- sort(sample(seq_len(500), 30, replace = FALSE))
idx2 <- sort(sample(seq_len(500), 30, replace = FALSE))
idx3 <- sort(sample(seq_len(500), 30, replace = FALSE))
gmtFrame[idx1,1] <- NA
gmtFrame[idx2,2] <- NA
gmtFrame[idx3,3] <- NA
imputedFrame <- hapiImupte(gmtFrame, nSPT=2, allowNA=0)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.