Skip to content

Commit

Permalink
Update test_updateSeqlevelsStyle.R
Browse files Browse the repository at this point in the history
  • Loading branch information
AtaJadidAhari authored Jan 16, 2025
1 parent 3715c1f commit 87727af
Showing 1 changed file with 17 additions and 17 deletions.
34 changes: 17 additions & 17 deletions tests/testthat/test_updateSeqlevelsStyle.R
Original file line number Diff line number Diff line change
@@ -1,12 +1,12 @@
context("Test updateSeqlevelsStyle function")

test_that("hg38, UCSC to NCBI", {
if (!requireNamespace('BiocManager', quietly = TRUE)) {
install.packages('BiocManager')
BiocManager::install("remotes")
}
#if (!requireNamespace('BiocManager', quietly = TRUE)) {
# install.packages('BiocManager')
# BiocManager::install("remotes")
#}

BiocManager::install("BSgenome.Hsapiens.UCSC.hg38", ask=FALSE, update=FALSE)
#BiocManager::install("BSgenome.Hsapiens.UCSC.hg38", ask=FALSE, update=FALSE)

genome <- getBSgenome("hg38")
bsgenome <- genome
Expand All @@ -19,11 +19,11 @@ test_that("hg38, UCSC to NCBI", {
})

test_that("hg38, NCBI to UCSC", {
if (!requireNamespace('BiocManager', quietly = TRUE)) {
install.packages('BiocManager')
}
#if (!requireNamespace('BiocManager', quietly = TRUE)) {
# install.packages('BiocManager')
#}

BiocManager::install("BSgenome.Hsapiens.NCBI.GRCh38", ask=FALSE, update=FALSE)
#BiocManager::install("BSgenome.Hsapiens.NCBI.GRCh38", ask=FALSE, update=FALSE)

genome <- getBSgenome("GRCh38")
bsgenome <- genome
Expand All @@ -36,11 +36,11 @@ test_that("hg38, NCBI to UCSC", {
})

test_that("hg19, NCBI to UCSC", {
if (!requireNamespace('BiocManager', quietly = TRUE)) {
install.packages('BiocManager')
}
#if (!requireNamespace('BiocManager', quietly = TRUE)) {
# install.packages('BiocManager')
#}

BiocManager::install("BSgenome.Hsapiens.1000genomes.hs37d5", ask=FALSE, update=FALSE)
#BiocManager::install("BSgenome.Hsapiens.1000genomes.hs37d5", ask=FALSE, update=FALSE)
genome <- getBSgenome("hs37d5")
bsgenome <- genome

Expand All @@ -52,10 +52,10 @@ test_that("hg19, NCBI to UCSC", {
})

test_that("hg19, UCSC to NCBI", {
if (!requireNamespace('BiocManager', quietly = TRUE)) {
install.packages('BiocManager')
}
BiocManager::install("BSgenome.Hsapiens.UCSC.hg19", ask=FALSE, update=FALSE)
#if (!requireNamespace('BiocManager', quietly = TRUE)) {
# install.packages('BiocManager')
#}
#BiocManager::install("BSgenome.Hsapiens.UCSC.hg19", ask=FALSE, update=FALSE)
genome <- getBSgenome("hg19")
bsgenome <- genome

Expand Down

0 comments on commit 87727af

Please sign in to comment.