EvalAdmix: Difference between revisions

From software
Jump to navigation Jump to search
No edit summary
 
(6 intermediate revisions by the same user not shown)
Line 7: Line 7:




[[File:evalAdmix.png|thumb|550px]]
[[File:evalAdmix.jpg|thumb|550px]]




Line 95: Line 95:
Download the input file containing genotypes in binary plink format
Download the input file containing genotypes in binary plink format
<pre>
<pre>
wget http://pontus.popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.bed
wget https://popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.bed
wget http://pontus.popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.bim
wget https://popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.bim
wget http://pontus.popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.fam
wget https://popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.fam
</pre>
</pre>


Line 105: Line 105:


::Genotypes file prefix admixTjeck2.bed
::Genotypes file prefix admixTjeck2.bed
::Ancestral Populations K = 3
::Number of Ancestral Populations K = 3
::Number of CPU threads = 20




Line 115: Line 116:
::Admixture proportions file admixTjeck2.3.Q (-qname admixTjeck2.3.Q).
::Admixture proportions file admixTjeck2.3.Q (-qname admixTjeck2.3.Q).
::Computer cores = 20 (-P 20).  
::Computer cores = 20 (-P 20).  


Plot results in R
Plot results in R
[[File:evalAdmixK3.Q.png|thumb|frame|admixture proportions]]
[[File:evalAdmixK3.cor.png|thumb|frame|evalAdmix correlations]]
<pre>
<pre>
source("visFuns.R")
source("visFuns.R")
Line 122: Line 126:
# read population labels and estimated admixture proportions
# read population labels and estimated admixture proportions
pop<-read.table("admixTjeck2.fam")
pop<-read.table("admixTjeck2.fam")
q<-read.table("admixTjeck2.3.Q")
q<-read.table("admixTjeck2.3.Q",stringsAsFactors=T)


palette(c("#A6CEE3","#1F78B4","#B2DF8A","#33A02C","#FB9A99","#E31A1C","#FDBF6F","#FF7F00","#CAB2D6","#6A3D9A","#FFFF99","#B15928","#1B9E77","#999999"))


# order according to population and plot the ADMIXTURE reults
# order according to population and plot the ADMIXTURE reults
ord<-orderInds(pop = as.vector(pop[,2]), q = q)
ord<-orderInds(pop = as.vector(pop[,2]), q = q)
barplot(t(q)[,ord],col=2:10,space=0,border=NA,xlab="Individuals",ylab="Demo2 Admixture proportions for K=3")
 
text(sort(tapply(1:nrow(pop),pop[ord,2],mean)),-0.05,unique(pop[ord,2]),xpd=T)
#make barplot
abline(v=cumsum(sapply(unique(pop[ord,2]),function(x){sum(pop[ord,2]==x)})),col=1,lwd=1.2)
plotAdmix(q,ord=ord,pop=pop[,2])
 





Latest revision as of 18:57, 4 March 2024

IMPORTANT: version 0.95 (updated on 30/06/2021) fixes a bug in the implementation for genotype data, which caused displacement of genotypes between samples when a site had missing data. When all sites have some missingness this would result in the last samples from the analyses having a correlation of nan with all other samples; but might have some more subtle effects whenever there is some level of missingness. If you have analyses from previous versions based on genotype data with any missingness might be a good idea to re-run them after updating. The bug did not affect the genotype likelihoods implementation so if you based the analyses on genotype likelihoods you do not need to worry. If you applied it to gentoype data without any missingness you also do not need to worry.

evalAdmix allows to evaluate the results of an admixture analysis (i.e. the result of applying ADMIXTURE, STRUCTURE, NGSadmix and similar). It only needs the input genotype data used for the previous admixture analysis and the output of that analysis (admixture proportions and ancestral population frequencies). The genotype input data can either be called genotypes in binary plink format or genotype likelihoods in beagle format.

The output is a pairwise correlation of residuals matrix between individuals. The correlation will be close to 0 in case of a good fit of the data to the admixture model. When individuals do not fit the model, individuals with similar demographic histories (i.e. usually individuals from the same population) will be positively correlated; and individuals with different histories but that are modelled as sharing one or more ancestral populations as admixture sources will have a negative correlation. Positive correlation between a pair of individuals might also be due to relatedness.



Download and Installation

evalAdmix can be installed from github

git clone https://github.com/GenisGE/evalAdmix.git
cd evalAdmix
make

Quick start

./evalAdmix -beagle inputBeagleFile.gz -fname myoutfiles.fopt.gz -qname myoutfiles.qopt -o evaladmixOut.corres -P 10
./evalAdmix -plink inputPlinkPrefix -fname inputPlinkPrefix.K.P -qname inputPlinkPrefix.K.Q -o evaladmixOut.corres -P 10
  • -beagle beagle file of genotype likelihoods
  • -plink binary plink file prefix with genotype data
  • -fname file with ancestral frequencies (space delimited, rows are sites and columns ancestral populations)
  • -qname file with admixture proportions (space delimited, rows are individuals and columns ancestral populations)
  • -o prefix of output file names
  • -P Number of threads used

Parameters

./evalAdmix  
Arguments:
	Required:
		-plink path to binary plink file (excluding the .bed)
		or
	      	-beagle path to beagle file containing genotype likelihoods (alternative to -plink)
		
		-fname path to ancestral population frequencies file
	       	-qname path to admixture proportions file
		
	Optional:       
	
	       -o name of the output file
	       
	 Setup (optional):
	 
	       -P 1 number of threads
	       -autosomeMax 23	 autosome ends with this chromsome
	       -nIts 5	 number of iterations to do for frequency correction; if set to 0 calculates correlation without correction (fast but biased)
	       -useSites 1.0	 proportion of sites to use to calculate correlation of residuals
	       -useInds filename     path to tab delimited file with first column containing all individuals ID and second column with 1 to include individual in analysis and 0 otherwise (default all individuals are included)
	       -misTol 0.05 	 tolerance for considering site as missing when using genotype likelihoods. Use same value as used in NGSadmix to keep compatibility when using genotype likelihoods (-beagle)
	       -minMaf 0.05 	 minimum minor allele frequency to keep site. Use same value as used in NGSadmix to keep compatibility when using genotype likelihoods (-beagle)

Input Files

Plink

Genotype data files in binary PLINK format (.bed .fam .bim).

Beagle genotype likelhoods

The input file contains genotype likelihoods in a .beagle file format [1]. and can be compressed with gzip.

BAM files

If you have BAM files you can use ANGSD to produce genotype likelihoods in .beagle format. Please see Creation of Beagle files with ANGSD

VCF files

If you already have made a VCF file that contains genotype likehood information then it should be possible to convert .vcf files with genotype likelihoods to .beagle file via vcftools [2]

vcftools --vcf input.vcf --out test --BEAGLE-GL --chr 1,2

Chromosome has to be specified.

You can also use bcftools' [3] 'query' option for generating a .beagle file from a .vcf file.

Output File

The analysis performed by evalAdmix produces one file, containing a tab delimited N times N symmetric correlation matrix, where column i in line j contains the correlation of residuals between individual i and j, and the diagonal values (self-correlation) are set to NA:

NA 0.008609 -0.006919 0.002731 0.020224
0.008609 NA 0.000033 0.004968 -0.008470
-0.006919 0.000033 NA 0.006982 0.005664
0.002731 0.004968 0.006982 NA 0.000521
0.020224 -0.008470 0.005664 0.000521 NA

Run command example

Genotype data

Download the input file containing genotypes in binary plink format

wget https://popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.bed
wget https://popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.bim
wget https://popgen.dk/albrecht/open/admixTjeck/plink/admixTjeck2.fam

Run ADMIXTURE [4] to obtain admixture proprotions

admixture admixTjeck2.bed 3 -j20
Genotypes file prefix admixTjeck2.bed
Number of Ancestral Populations K = 3
Number of CPU threads = 20


Run evalAdmix

./evalAdmix -plink admixTjeck2 -fname admixTjeck2.3.P -qname admixTjeck2.3.Q -P 20 
Genotypes file prefix admixTjeck2 (-plink admixTjeck2).
Ancestral Populations frequency file admixTjeck2.3.P (-fname admixTjeck2.3.P).
Admixture proportions file admixTjeck2.3.Q (-qname admixTjeck2.3.Q).
Computer cores = 20 (-P 20).


Plot results in R

Error creating thumbnail: File missing
admixture proportions
Error creating thumbnail: File missing
evalAdmix correlations
source("visFuns.R")

# read population labels and estimated admixture proportions
pop<-read.table("admixTjeck2.fam")
q<-read.table("admixTjeck2.3.Q",stringsAsFactors=T)

palette(c("#A6CEE3","#1F78B4","#B2DF8A","#33A02C","#FB9A99","#E31A1C","#FDBF6F","#FF7F00","#CAB2D6","#6A3D9A","#FFFF99","#B15928","#1B9E77","#999999"))

# order according to population and plot the ADMIXTURE reults
ord<-orderInds(pop = as.vector(pop[,2]), q = q)

#make barplot
plotAdmix(q,ord=ord,pop=pop[,2])



r<-as.matrix(read.table("output.corres.txt"))

# Plot correlation of residuals
plotCorRes(cor_mat = r, pop = as.vector(pop[,2]), ord=ord, title="Evaluation of 1000G admixture proportions with K=3", max_z=0.1, min_z=-0.1)

Low depth sequencing data

Download the input file containing genotype likelihoods in beagle format

wget popgen.dk/software/download/NGSadmix/data/Demo2input.gz
wget popgen.dk/software/download/NGSadmix/data/Demo2pop.info

Execute NGSadmix to obtain admixture proportions

./NGSadmix -likes Demo2input.gz -K 3 -P 20 -o myoutfiles -minMaf 0.05
Input file = Demo2input.gz
Ancestral Populations K=3
Computer cores = 20 (-P 20).
Output prefix = myoutfiles (-o myoutfiles)
SNPs with MAF > 5% (-minMaf 0.05)

Run evalAdmix

./evalAdmix -beagle Demo2input.gz -fname myoutfiles.fopt.gz -qname myoutfiles.qopt -P 20 
Genotype likelihoods file Demo2input.gz (-beagle Demo2input.gz).
Ancestral Populations frequency file myoutfiles.fopt.gz (-fname myoutfiles.fopt.gz).
Admixture proportions file myoutfiles.qopt(-qname myoutfiles.qopt).
Computer cores = 20 (-P 20).

Plot results in R

source("visFuns.R")
# read population labels and estimated admixture proportions
pop<-read.table("Demo2pop.info",as.is=T)
q<-read.table("myoutfiles.qopt")

# order according to population and plot the NGSadmix reults
ord<-orderInds(pop = as.vector(pop[,1]), q = q)
barplot(t(q)[,ord],col=2:10,space=0,border=NA,xlab="Individuals",ylab="Demo2 Admixture proportions for K=3")
text(sort(tapply(1:nrow(pop),pop[ord,1],mean)),-0.05,unique(pop[ord,1]),xpd=T)
abline(v=cumsum(sapply(unique(pop[ord,1]),function(x){sum(pop[ord,1]==x)})),col=1,lwd=1.2)

r<-read.table("output.corres.txt")

# Plot correlation of residuals

plotCorRes(cor_mat = r, pop = as.vector(pop[,1]), ord = ord, title="Evaluation of 1000G admixture proportions with K=3", max_z=0.1, min_z=-0.1)

Citation

Evaluation of Model Fit of Inferred Admixture Proportions