# \donttest{
data(lesion_data)
data(hg38_gene_annotation)
data(hg38_chrom_size)
data(hg38_cytoband)
# run GRIN analysis using grin.stats function
grin.results=grin.stats(lesion_data,
hg38_gene_annotation,
hg38_chrom_size)
# Plots Showing Different Types of Lesions Affecting a region of Interest without plotting the
# transcripts track (this will allow plotting a larger locus of the chromosome such as a
# chromosome band (should specify transTrack = FALSE):
cdkn2a.locus=lsn.transcripts.plot(grin.results, transTrack = FALSE,
hg38.cytoband=hg38_cytoband, chrom=9,
plot.start=19900000, plot.end=25600000,
lesion.grp = "loss", spec.lsn.clr = "blue")
# Plots Showing Different Types of Lesions Affecting the whole chromosome:
chrom.plot=lsn.transcripts.plot(grin.results, transTrack = FALSE,
hg38.cytoband=hg38_cytoband, chrom=9,
plot.start=1, plot.end=141000000)
# }
Run the code above in your browser using DataLab