--- 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);