Quickstart

Contents

Quickstart#

The easiest way to get started is by using the BaseInference class which infers the DFE from a single pair of frequency spectra, one neutral and one selected. In this example we create Spectrum objects holding the SFS counts and pass them to BaseInference. Note that we are required to specify the number of monomorphic sites (the last and first entries of the specified counts which correspond to the number of mono-allelic sites where the ancestral and derived allele is fixed, respectively). By default, only the deleterious part of the DFE is inferred (cf. fixed_params).

library(fastdfe)

# load the fastdfe package
fd <- load_fastdfe()

# configure inference
inf <- fd$BaseInference(
  sfs_neut = fd$Spectrum(c(177130, 997, 441, 228, 156, 117, 114, 83, 105, 109, 0)),
  sfs_sel = Spectrum(c(797939, 1329, 499, 265, 162, 104, 117, 90, 94, 119, 0)),
  do_bootstrap = False
)

# run inference
sfs_models <- fd$BaseInference$run(inf)

fastDFE uses maximum likelihood estimation (MLE) to find the DFE. By default, 10 local optimization runs are carried out to make sure a reasonably good global optimum has been bound. The DFE furthermore needs to parametrized where GammaExpParametrization is used by default. We also report the standard deviation across optimization runs to give an idea of the reliability of the estimates. In this case, the standard deviations are low, indicating that the estimates are stable.

We can now plot the inferred DFE in discretized form (cf. plot_discretized()).

p <- fd$BaseInference$plot_discretized(inf)
../../_images/8c4e50cb3f773eda9eeecb06690bd5f9be568b48eca00491d020ddae72078c7c.png

We can also plot a comparison of the selected modelled and observed SFS (cf. plot_sfs_comparison()).

p <- fd$BaseInference$plot_sfs_comparison(inf)
../../_images/0fbc8f6d900f0f3e486506fd932d7fe1a596eb98d4aabf15d7cbdc1cbb48a0a7.png

Bootstrapping#

To quantify uncertainly we can perform parametric bootstrapping (cf. bootstrap())

bs <- inf$bootstrap()

# redo the plotting
p <- fd$BaseInference$plot_discretized(inf)
../../_images/4ba46c776059a768b45c4accaefe3017b70815066228e4e63429f75b377916ca.png

By default, we perform 2 optimization runs per bootstrap sample taking the best result (cf. n_bootstrap_retries). The standard deviation across runs is computed for each bootstrap sample, and the average of these standard deviations across all samples is reported to summarize the uncertainty of the bootstrap estimates. In this case, we can see that the uncertainty is quite low indicating reliable bootstrap estimates.

Contents