restyle

DEploid-dev · Dec 8, 2024 · ec0a0ae · ec0a0ae
1 parent 25adfdf
commit ec0a0ae
Showing 1 changed file with 14 additions and 0 deletions.
diff --git a/tests/testthat/setup.R b/tests/testthat/setup.R
@@ -0,0 +1,14 @@
+vcfFileName <- system.file("extdata", "PG0390-C.test.vcf.gz",
+  package = "DEploid.utils"
+)
+plafFileName <- system.file("extdata", "labStrains.test.PLAF.txt",
+  package = "DEploid.utils"
+)
+panelFileName <- system.file("extdata", "labStrains.test.panel.txt",
+  package = "DEploid.utils"
+)
+refFileName <- system.file("extdata", "PG0390-C.test.ref", package = "DEploid.utils")
+altFileName <- system.file("extdata", "PG0390-C.test.alt", package = "DEploid.utils")
+
+PG0390CoverageVcf <- extractCoverageFromVcf(vcfFileName, "PG0390-C")
+plaf <- extractPLAF(plafFileName)