From c798eacfbf00859d48d0857cefc01220c81209c2 Mon Sep 17 00:00:00 2001
From: Zilong-Li <zimusen94@gmail.com>
Date: Thu, 21 Mar 2024 11:29:03 +0100
Subject: [PATCH] see if fixed

---
 R/RcppExports.R    | 2 +-
 man/vcfwriter.Rd   | 2 +-
 src/vcf-writer.cpp | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/R/RcppExports.R b/R/RcppExports.R
index fe1907c..3bfd63f 100644
--- a/R/RcppExports.R
+++ b/R/RcppExports.R
@@ -189,7 +189,7 @@ tableFormat <- function(vcffile, region, samples, format, ids, qualval, pass, IN
 #' bw$addFORMAT("GT", "1", "String", "Genotype");
 #' bw$addSample("NA12878")
 #' bw$addSample("NA12879")
-#' s1 <- "chr20\t2006060\trs146931526\tG\tC\t100\tPASS\tAF=0.000998403\tGT\t1|0\t1/1"
+#' s1 <- "chr20\t2006060\trs146931526\tG\tC\t100\tPASS\tAF=0.000998403\tGT\t1|0\t1|1"
 #' bw$writeline(s1)
 #' bw$close()
 #' file.remove(outvcf)
diff --git a/man/vcfwriter.Rd b/man/vcfwriter.Rd
index be95f80..99bdd52 100644
--- a/man/vcfwriter.Rd
+++ b/man/vcfwriter.Rd
@@ -60,7 +60,7 @@ bw$addINFO("AF", "A", "Float", "Estimated allele frequency in the range (0,1)");
 bw$addFORMAT("GT", "1", "String", "Genotype");
 bw$addSample("NA12878")
 bw$addSample("NA12879")
-s1 <- "chr20\t2006060\trs146931526\tG\tC\t100\tPASS\tAF=0.000998403\tGT\t1|0\t1/1"
+s1 <- "chr20\t2006060\trs146931526\tG\tC\t100\tPASS\tAF=0.000998403\tGT\t1|0\t1|1"
 bw$writeline(s1)
 bw$close()
 file.remove(outvcf)
diff --git a/src/vcf-writer.cpp b/src/vcf-writer.cpp
index e76d8ab..6d54fa3 100644
--- a/src/vcf-writer.cpp
+++ b/src/vcf-writer.cpp
@@ -45,7 +45,7 @@ using namespace std;
 //' bw$addFORMAT("GT", "1", "String", "Genotype");
 //' bw$addSample("NA12878")
 //' bw$addSample("NA12879")
-//' s1 <- "chr20\t2006060\trs146931526\tG\tC\t100\tPASS\tAF=0.000998403\tGT\t1|0\t1/1"
+//' s1 <- "chr20\t2006060\trs146931526\tG\tC\t100\tPASS\tAF=0.000998403\tGT\t1|0\t1|1"
 //' bw$writeline(s1)
 //' bw$close()
 //' file.remove(outvcf)