From b7c4245c627015b61fbd09077567b52db68a33ab Mon Sep 17 00:00:00 2001
From: Vincent LAVILLE <vincent.laville@pasteur.fr>
Date: Tue, 21 Nov 2017 12:28:19 +0100
Subject: [PATCH] Updated README

---
 README.md | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/README.md b/README.md
index 2866268..27feec6 100644
--- a/README.md
+++ b/README.md
@@ -96,9 +96,9 @@ std_betaG <- standardizeBeta(GWAS$MAIN_EFFECT, GWAS$INT_EFFECT, GWAS$FREQ_A0, pa
 std_betaI <- standardizeBeta(GWAS$MAIN_EFFECT, GWAS$INT_EFFECT, GWAS$FREQ_A0, parsE[1], parsE[2], type = "I")
 
 # Estimation of the fraction of variance explained
-fracG    <- calculateVarFrac(std_betaG, std_betaI, C, parsY[2], sum(COHORT$PHENO_N), "G")
-fracI    <- calculateVarFrac(std_betaG, std_betaI, C, parsY[2], sum(COHORT$PHENO_N), "I")
-fracJ    <- calculateVarFrac(std_betaG, std_betaI, C, parsY[2], sum(COHORT$PHENO_N), "J")
+fracG    <- calculateVarExp(std_betaG, std_betaI, C, parsY[2], sum(COHORT$PHENO_N), "G")
+fracI    <- calculateVarExp(std_betaG, std_betaI, C, parsY[2], sum(COHORT$PHENO_N), "I")
+fracJ    <- calculateVarExp(std_betaG, std_betaI, C, parsY[2], sum(COHORT$PHENO_N), "J")
 ```
 
 Bug report / Help
-- 
GitLab