circosLegend {MetCirc} | R Documentation |
circosLegend
plots a legend for circos plot using
group names.
circosLegend(groupname, highlight=TRUE, colour=NULL, cex=1)
groupname |
|
highlight |
|
colour |
|
cex |
|
Internal use in shinyCircos
or outside of shinyCircos
to reproduce figures.
The function will open a new plot and display colours together with labels.
Thomas Naake, thomasnaake@googlemail.com
data("spectra", package="MetCirc") similarityMat <- compare_Spectra(spectra_tissue[1:10], fun=normalizeddotproduct, binSize=0.01) linkDf <- createLinkDf(similarityMatrix=similarityMat, spectra=spectra_tissue[1:10], condition=c("SPL", "LIM", "ANT", "STY"), lower=0.5, upper=1) ## cut link data.frame (here: only display links between groups) linkDf_cut <- cutLinkDf(linkDf, type="inter") groupname <- c(as.character(linkDf_cut[, "spectrum1"]), as.character(linkDf_cut[, "spectrum2"])) groupname <- unique(groupname) ## plot legend circosLegend(groupname, highlight=TRUE, colour=NULL, cex=1)