@@ -832,14 +832,14 @@ one or more selected chromosomes.
832
832
LGGmut <- GDCquery_Maf(tumor = "LGG", pipelines = "mutect2")
833
833
```
834
834
835
- ``` {r results='hide', echo=TRUE, message=FALSE,warning=FALSE}
835
+ ``` {r results='hide', echo=TRUE, message=FALSE,warning=TRUE, eval = FALSE}
836
836
###############################################
837
837
## Genomic aberration overview - Circos plot ##
838
838
###############################################
839
839
# Retrieve curated mutations for selected cancer (e.g. "LGG")
840
840
data(mafMutect2LGGGBM)
841
841
# Select only potentially damaging mutations
842
- LGGmut %>%
842
+ LGGmut <- LGGmut %>%
843
843
dplyr::filter(
844
844
Variant_Classification %in%
845
845
c(
@@ -876,10 +876,12 @@ names(colors) <- c(0,1)
876
876
colors <- c("blue","green","red","gold")
877
877
names(colors) <- typeNames[1:4]
878
878
circos.genomicTrackPlotRegion(
879
- s.mut, ylim = c(1.2,4.2),
879
+ s.mut,
880
+ ylim = c(1.2,4.2),
880
881
panel.fun = function(region, value, ...) {
881
882
circos.genomicPoints(region, value, cex = 0.8, pch = 16, col = colors[value[[2]]], ...)
882
- })
883
+ }
884
+ )
883
885
884
886
circos.clear()
885
887
0 commit comments