R:Circos圖通過circlize

Circos圖可以通過Circos官方下載话肖。使用教程
個人感覺R畫出的圖莫名的有種優(yōu)越感多律。圖片優(yōu)美煤率,數(shù)據(jù)銜接方便涨岁。可視化,就首選R.
華人小哥帖努,開發(fā)了R包circlize用于Circos圖。circlize github地址
circlize在線電子書 Circular Visualization in R (jokergoo.github.io)

1.安裝circlize
install.packages("circlize")

2.circlize繪圖的原理
繪制是從外圈往內(nèi)圈说庭,一圈一圈繪制的然磷。

circos.clear()#初始化,如果前面繪制過刊驴,則清空畫布姿搜,從第一圈開始繪制
circos.par("track.height" = 0.1)#設(shè)置每一圈的高度為10%
circos.initializeWithIdeogram(plotType = NULL)
bed = generateRandomBed(nr = 100)
##第1圈
circos.genomicTrack(bed, panel.fun = function(region, value, ...) {
  circos.genomicLines(region, value, type = "l", ...)#繪制基因組數(shù)據(jù),用折線
})
##第2圈
circos.genomicTrack(bed, numeric.column = 4, 
                    panel.fun = function(region, value, ...) {
                      # numeric.column is automatically passed to `circos.genomicPoints()`
                      circos.genomicPoints(region, value,cex=0.25, ...)#繪制基因組數(shù)據(jù)捆憎,用散點
                    })

bed的數(shù)據(jù)格式是:

chr     start       end      value1
1 chr1  14469506  18337628  0.84710953
2 chr1  30748362  37272545 -0.20273840
3 chr1  71335907  80561701  0.03841746
4 chr1  86693969 125073619  0.55653742
5 chr1 147936959 173168706 -0.30889214
6 chr1 178652869 179623084  0.03241299

該軟件提供的有genomic的函數(shù)舅柜,是用于基因組分析。如果使用帶有genomic的函數(shù)躲惰,注意染色體致份,這個默認(rèn)的染色體格式是chr1這種類型,默認(rèn)的人類的染色體數(shù)據(jù)础拨。如果是其他格式的染色體編號氮块,需要設(shè)置如下

circos.genomicInitialize(IDM,major.by = 50000000)#后面的是設(shè)置刻度為大刻度為50M,每個大刻度默認(rèn)是有5個小刻度诡宗。前面的IDM是數(shù)據(jù)框滔蝉,用于自定義染色體數(shù)據(jù)。

IDM數(shù)據(jù)框的格式如下:

name start end
CHR01 1 120000000
CHR02 1 240000000

IDM第一列是你實際使用的染色體的名稱塔沃,第二列是起始位置1蝠引,第三列是染色體長度。
三列的列名必須和上面的列名完全一致蛀柴。

基礎(chǔ)繪圖函數(shù)

如果直接使用原生的函數(shù)繪制螃概,這樣就可以使用其他格式的染色體名稱。
可以繪制的圖形格式有:后面展示的是對應(yīng)的函數(shù)的需要的最少的參數(shù)個數(shù)
Points點 circos.points(x, y)
Lines線條circos.lines(x, y)
Segments面circos.segments(x0, y0, x1, y1)
Text文本circos.text(x, y, labels)
Rectangles矩形circos.rect(xleft, ybottom, xright, ytop)
polygons多邊形circos.polygon(x, y)
Axes坐標(biāo)軸circos.axis(h)
Barplots, boxplots and violin plots 柱狀圖鸽疾、箱線圖吊洼、小提琴圖
circos.barplot(value, 1:10 - 0.5, col = 1:10)
circos.boxplot(value, 1:10 - 0.5, col = 1:10)
circos.violin(value, pos)
Links連線
circos.link(sector.index1, 0, sector.index2, 0)
circos.link(sector.index1, 0, sector.index2, 0, rou1, rou2)
繪制熱圖、進(jìn)化樹
circos.heatmap()

基因組專用的函數(shù)

circos.initializeWithIdeogram()
circos.genomicInitialize()
circos.genomicTrack()
circos.genomicPoints()
circos.genomicLines()
circos.genomicText()
circos.genomicRect()
circos.genomicLink()
circos.genomicIdeogram() 基因組的坐標(biāo)軸
circos.genomicHeatmap()
circos.genomicLabels()
circos.genomicDensity()
circos.genomicRainfall()

高階函數(shù)

chordDiagram()可以用于繪制共線性制肮,就是俗稱的弦圖冒窍。

批量執(zhí)行函數(shù)circos.track可以批量繪制圖形

circos.track(..., panel.fun = function(x, y) {
    circos.points(x, y)
})
circos.points(x, y, sector.index, track.index)
最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市弄企,隨后出現(xiàn)的幾起案子超燃,更是在濱河造成了極大的恐慌区拳,老刑警劉巖拘领,帶你破解...
    沈念sama閱讀 206,126評論 6 481
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件,死亡現(xiàn)場離奇詭異樱调,居然都是意外死亡约素,警方通過查閱死者的電腦和手機届良,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 88,254評論 2 382
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來圣猎,“玉大人士葫,你說我怎么就攤上這事∷突冢” “怎么了慢显?”我有些...
    開封第一講書人閱讀 152,445評論 0 341
  • 文/不壞的土叔 我叫張陵,是天一觀的道長欠啤。 經(jīng)常有香客問我荚藻,道長,這世上最難降的妖魔是什么洁段? 我笑而不...
    開封第一講書人閱讀 55,185評論 1 278
  • 正文 為了忘掉前任应狱,我火速辦了婚禮,結(jié)果婚禮上祠丝,老公的妹妹穿的比我還像新娘疾呻。我一直安慰自己,他們只是感情好写半,可當(dāng)我...
    茶點故事閱讀 64,178評論 5 371
  • 文/花漫 我一把揭開白布岸蜗。 她就那樣靜靜地躺著,像睡著了一般污朽。 火紅的嫁衣襯著肌膚如雪散吵。 梳的紋絲不亂的頭發(fā)上,一...
    開封第一講書人閱讀 48,970評論 1 284
  • 那天蟆肆,我揣著相機與錄音矾睦,去河邊找鬼。 笑死炎功,一個胖子當(dāng)著我的面吹牛枚冗,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播蛇损,決...
    沈念sama閱讀 38,276評論 3 399
  • 文/蒼蘭香墨 我猛地睜開眼赁温,長吁一口氣:“原來是場噩夢啊……” “哼!你這毒婦竟也來了淤齐?” 一聲冷哼從身側(cè)響起股囊,我...
    開封第一講書人閱讀 36,927評論 0 259
  • 序言:老撾萬榮一對情侶失蹤,失蹤者是張志新(化名)和其女友劉穎更啄,沒想到半個月后稚疹,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 43,400評論 1 300
  • 正文 獨居荒郊野嶺守林人離奇死亡祭务,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 35,883評論 2 323
  • 正文 我和宋清朗相戀三年内狗,在試婚紗的時候發(fā)現(xiàn)自己被綠了怪嫌。 大學(xué)時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 37,997評論 1 333
  • 序言:一個原本活蹦亂跳的男人離奇死亡柳沙,死狀恐怖岩灭,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情赂鲤,我是刑警寧澤噪径,帶...
    沈念sama閱讀 33,646評論 4 322
  • 正文 年R本政府宣布,位于F島的核電站数初,受9級特大地震影響熄云,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜妙真,卻給世界環(huán)境...
    茶點故事閱讀 39,213評論 3 307
  • 文/蒙蒙 一缴允、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧珍德,春花似錦练般、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,204評論 0 19
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至泵琳,卻和暖如春摄职,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背获列。 一陣腳步聲響...
    開封第一講書人閱讀 31,423評論 1 260
  • 我被黑心中介騙來泰國打工谷市, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留,地道東北人击孩。 一個月前我還...
    沈念sama閱讀 45,423評論 2 352
  • 正文 我出身青樓迫悠,卻偏偏與公主長得像,于是被迫代替她去往敵國和親巩梢。 傳聞我的和親對象是個殘疾皇子创泄,可洞房花燭夜當(dāng)晚...
    茶點故事閱讀 42,722評論 2 345

推薦閱讀更多精彩內(nèi)容