library("Gviz")
chrom <- "chr2"
start <- 38290160
end <- 38303219
gen <- "hg38"
if(interactive()){
clinCNV<-ClinVarCnv_UCSC(gen,chrom,start,end)
plotTracks(clinCNV, from = start, to =end)
}else {
data(ClinVarCnvTrack)
plotTracks(clinCNV, from = start, to =end)
}
Run the code above in your browser using DataLab