@@ -1,7 +1,7 @@

 Package: scmeth

 Type: Package

 Title: Functions to conduct quality control analysis in methylation data

-Version: 0.99.35

+Version: 0.99.36

 Author: Divy Kangeyan <[email protected]>

 Maintainer: Divy Kangeyan <[email protected]>

 Depends: R (>= 3.5.0)

@@ -34,8 +34,8 @@

 #'@export

 #

-report <- function(bsObj,outdirectory,organism,genome=c("mm10", "hg38"),mbiasDir=NULL,subSample=1e6,offset=50000,small=FALSE) {

-    genome <- match.arg(genome)

+report <- function(bsObj,outdirectory,organism,genome,mbiasDir=NULL,subSample=1e6,offset=50000,small=FALSE) {

+    #genome <- match.arg(genome)

     RmdFile <- system.file(".",'qcReport.Rmd',package="scmeth")

     rmarkdown::render(RmdFile,params=list(outdir=outdirectory,samples=bsObj,

                                         organism=organism,genome=genome,

@@ -4,8 +4,8 @@

 \alias{report}

 \title{Generates an inclusive report on methylation analysis}

 \usage{

-report(bsObj, outdirectory, organism, genome = c("mm10", "hg38"),

-  mbiasDir = NULL, subSample = 1e+06, offset = 50000, small = FALSE)

+report(bsObj, outdirectory, organism, genome, mbiasDir = NULL,

+  subSample = 1e+06, offset = 50000, small = FALSE)

 }

 \arguments{

 \item{bsObj}{bsseq object}