您好,登錄后才能下訂單哦!
這篇文章主要介紹“R語言怎么實現circlize包畫圈圖”,在日常操作中,相信很多人在R語言怎么實現circlize包畫圈圖問題上存在疑惑,小編查閱了各式資料,整理出簡單好用的操作方法,希望對大家解答”R語言怎么實現circlize包畫圈圖”的疑惑有所幫助!接下來,請跟著小編一起來學習吧!
library(circlize)
library(RColorBrewer)
col<-RColorBrewer::brewer.pal(6,"Paired")
df<-data.frame(chr=sample(c(paste0("chr",1:6)),1000,replace = T),
x=rnorm(1000),
y=rnorm(1000))
head(df)
circos.initialize(factors = df$chr,x=df$x)
circos.trackPlotRegion(factors = df$chr,y=df$y,
panel.fun = function(x,y){
circos.axis()
})
for(i in 1:6){
highlight.sector(sector.index = paste0("chr",i),col=col[i])
circos.text(CELL_META$xcenter, CELL_META$ycenter,
labels = paste0("chr",i),sector.index = paste0("chr",i))
}
circos.trackHist(df$chr,df$x,col=col)
circos.link("chr1",0,"chr2",0)
circos.link("chr4",c(-2,0),"chr3",c(-2,2),col="blue")
circos.link("chr4", c(0, 2), "chr6", c(-2, 0), col = "orange")
circos.link("chr5", c(0, 2), "chr1", c(-2, 2), col = "lightgrey")
circos.clear()
這里遇到一個問題是
circos.trackPoints(df$chr,df$x,df$y,pch=16,cex=0.5,col=col)
circos.trackHist(df$chr,df$x,col=col)
為什么circos.trackPoints(df$chr,df$x,df$y,pch=16,cex=0.5,col=col)
沒有新創建一圈呢?
第二個問題是:
circos.text()函數的兩個參數
CELL_META$xcenter
CELL_META$ycenter
是哪里來的呀?如果我想把文本放在每個單元格的中間是固定用這兩個參數就可以嗎?
另外的參數
sector.index
track.index
到此,關于“R語言怎么實現circlize包畫圈圖”的學習就結束了,希望能夠解決大家的疑惑。理論與實踐的搭配能更好的幫助大家學習,快去試試吧!若想繼續學習更多相關知識,請繼續關注億速云網站,小編會繼續努力為大家帶來更多實用的文章!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。