diff options
-rw-r--r-- | scripts/ctl_analysis.R | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/scripts/ctl_analysis.R b/scripts/ctl_analysis.R index e69de29..bfb6da4 100644 --- a/scripts/ctl_analysis.R +++ b/scripts/ctl_analysis.R @@ -0,0 +1,6 @@ +library(ctl) + +# The genotypes.csv file containing the genotype matrix is stored individuals (rows) x genetic marker (columns): +genotypes <- read.csv("genotypes.csv",row.names=1, header=FALSE, sep="\t") +# The phenotypes.csv file containing individuals (rows) x traits (columns) measurements: +traits <- read.csv("phenotypes.csv",row.names=1, header=FALSE, sep="\t") |