Description Usage Arguments Details Value References Examples
A generic function to estimate archaic admixture.
1 2 3 4 5 6 7 8 9 |
object |
An object of class |
subsites |
|
do.D |
Pattersons D and Martin's f statistic |
do.df |
d-fraction |
keep.site.info |
keep site specific values ( |
block.size |
the block size for jackknife |
do.RNDmin |
RNDmin (Rosenzweig, 2016) |
l.smooth |
laplace smoothing for Bd-fraction |
To perform the D and f statistic one needs to define 3 populations via the function set.populations
,
where the third population represent the archaic population. In addition, an outgroup is required and have to be
set via the function set.outgroup
. Here, only SNPs where the outgroup is monomorphic are considered.
f is the fraction of the genome that is admixed [2].
Returned value is a modified object of class "GENOME"
———————————————————
The following slots will be modified in the "GENOME"
object
———————————————————
Slot | Reference | Description | |
1. | D | [1;eq. 2] | Pattersons D statistic |
2. | f | [2] | f statistic |
3. | df | [3] | Bd-fraction |
4. | RNDmin | [x] | RNDmin |
5. | D.z | [x] | z values (jackknife) |
6. | D.pval | [x] | P values (jackknife) |
7. | df.z | [3] | z values (jackknife) |
8. | df.pval | [3] | P values (jackknife) |
[1] Durand, E. Y., Patterson, N. J., Reich, D., & Slatkin, M. (2011). Testing for ancient admixture between closely related populations.
Molecular Biology and Evolution, 28(8), 2239–2252. doi:10.1093/molbev/msr048
[2] Simon H Martin, Kanchon K Dasmahapatra, Nicola J Nadeau, et al. (2013). Genome-wide evidence for speciation with gene flow in Heliconius butterflies.
Genome Res. doi:10.1101/gr.159426.113
[3] Bastian Pfeifer and Durrell D. Kapan (2019). Estimates of introgression as a function of pairwise distances.
BMC Bioinformatics. https://doi.org/10.1186/s12859-019-2747-z
1 2 3 4 5 6 7 8 9 10 | # GENOME.class <- readData("\home\Alignments")
# GENOME.class <- set.populations(GENOME.class,list(1:3,4:8,9:12))
# GENOME.class <- set.outgroup(GENOME.class,13)
# GENOME.class <- introgression.stats(GENOME.class, do.D=TRUE)
# show the result:
# GENOME.class@D
# GENOME.class@f
# GENOME.class <- introgression.stats(GENOME.class, do.df=TRUE)
# show the result:
# GENOME.class@df
|
Loading required package: ff
Loading required package: bit
Attaching package bit
package:bit (c) 2008-2012 Jens Oehlschlaegel (GPL-2)
creators: bit bitwhich
coercion: as.logical as.integer as.bit as.bitwhich which
operator: ! & | xor != ==
querying: print length any all min max range sum summary
bit access: length<- [ [<- [[ [[<-
for more help type ?bit
Attaching package: 'bit'
The following object is masked from 'package:base':
xor
Attaching package ff
- getOption("fftempdir")=="/work/tmp/tmp/RtmpE1zMqD"
- getOption("ffextension")=="ff"
- getOption("ffdrop")==TRUE
- getOption("fffinonexit")==TRUE
- getOption("ffpagesize")==65536
- getOption("ffcaching")=="mmnoflush" -- consider "ffeachflush" if your system stalls on large writes
- getOption("ffbatchbytes")==16777216 -- consider a different value for tuning your system
- getOption("ffmaxbytes")==536870912 -- consider a different value for tuning your system
Attaching package: 'ff'
The following objects are masked from 'package:bit':
clone, clone.default, clone.list
The following objects are masked from 'package:utils':
write.csv, write.csv2
The following objects are masked from 'package:base':
is.factor, is.ordered
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.