# HG changeset patch
# User greg
# Date 1540480217 14400
# Node ID 86aaadf36a4f17ccec2ed43fb09d46a6873dc4d4
# Parent  ba2df0561b126813589fb7f05b61961593254252
Uploaded

diff -r ba2df0561b12 -r 86aaadf36a4f multilocus_genotype.R
--- a/multilocus_genotype.R	Thu Oct 25 11:10:08 2018 -0400
+++ b/multilocus_genotype.R	Thu Oct 25 11:10:17 2018 -0400
@@ -9,7 +9,7 @@
 suppressPackageStartupMessages(library("knitr"))
 
 option_list <- list(
-    make_option(c("--input_vcf"), action="store", dest="input_vcf", help="VCF input file")
+    make_option(c("--input_vcf"), action="store", dest="input_vcf", help="VCF input file"),
     make_option(c("--input_pop_info"), action="store", dest="input_pop_info", help="Population information input file")
 )
 
@@ -28,7 +28,7 @@
 }
 
 #Read in VCF input file.
-vcf <- read.vcfR(opts$input_vcf);
+vcf <- read.vcfR(opt$input_vcf);
 
 # Convert VCF file into formats compatiable with the Poppr package.
 gind <- vcfR2genind(vcf);