diff --git a/R/ChIPseqSpikeInFree.R b/R/ChIPseqSpikeInFree.R index 329002b..f2f90ff 100644 --- a/R/ChIPseqSpikeInFree.R +++ b/R/ChIPseqSpikeInFree.R @@ -996,10 +996,10 @@ ChIPseqSpikeInFree <- function(bamFiles, chromFile = "hg19", cat("\nstep4. calculating scaling factors...") SF <- CalculateSF(data = parsedDF, metaFile = meta, minFirstTurn = "auto", maxLastTurn=maxLastTurn, cutoff_QC=cutoff_QC) cat("\nstep5. ploting distribution curves and bars ...") - PlotDistr(parsedDF, SF, prefix, xlimMaxCPMW="auto" ) + PlotDistr(parsedDF, SF, prefix, xlimMaxCPMW=NULL ) cat("\t[--done--]\n") cat("\nstep6. ploting scaling factors...") BoxplotSF(SF, prefix) cat("\n\t[--done--]\n") - invisible(result) + # invisible(result) }