## CNV data generated by cnv.data
data(seq.data)
head(seq.data)
## Not run:
# ## an example GC content file
# url <- "https://zhangz05.u.hpc.mssm.edu/saasCNV/data/GC_1kb_hg19.txt.gz"
# tryCatch({download.file(url=url, destfile="GC_1kb_hg19.txt.gz")
# }, error = function(e) {
# download.file(url=url, destfile="GC_1kb_hg19.txt.gz", method="curl")
# })
# ## If download.file fails to download the data, please manually download it from the url.
#
# gc <- read.delim(file = "GC_1kb_hg19.txt.gz", as.is=TRUE)
# head(gc)
#
# ## GC content adjustment
# seq.data <- GC.adjust(data = seq.data, gc = gc, maxNumDataPoints = 10000)
# head(seq.data)
# ## End(Not run)
Run the code above in your browser using DataLab