diff --git a/R/greedyMix.R b/R/greedyMix.R
index 8b79573..9c12cbf 100644
--- a/R/greedyMix.R
+++ b/R/greedyMix.R
@@ -9,12 +9,12 @@ greedyMix <- function(data, format) {
 		out <- load_fasta(data)
 	} else if (format == "vcf") {
 		stop("VCF files not yet supported." )
-		# TODO #16: implement load_vcf()
+		# TODO #17: implement load_vcf()
 	} else if (format == "sam") {
 		stop("SAM files not yet supported." )
-		# TODO #16: implement load_sam()
+		# TODO #18: implement load_sam()
 	} else if(format == "genepop") {
-		# TODO #16: implement load_genepop()
+		# TODO #19: implement load_genepop()
 		stop("GenePop files not yet supported." )
 	} else {
 		stop("Format not supported.")
diff --git a/tests/testthat/test-greedyMix.R b/tests/testthat/test-greedyMix.R
index dde5e54..71f1ccd 100644
--- a/tests/testthat/test-greedyMix.R
+++ b/tests/testthat/test-greedyMix.R
@@ -41,9 +41,9 @@ df_fasta <- greedyMix(
 	data   = paste(path_inst, "FASTA_clustering_haploid.fasta", sep="/"),
 	format ="fasta"
 )
-# TODO: add example reading VCF
-# TODO: add example reading SAM
-# TODO: add example reading Genpop
+# TODO #17: add example reading VCF
+# TODO #18: add example reading SAM
+# TODO #19: add example reading Genpop
 test_that("Files are imported correctly", {
 	expect_equal(dim(df_fasta), c(5, 99))
 })