cibersortx怎麼用 搬磚 免疫浸潤 實踐

2021-10-20 11:17:01 字數 2881 閱讀 8762

牛轉乾坤!新年快樂,小白來啃生信發*****~

上傳檔案要求

ok,來整理我的mixture。

準備好了~22880genes*10samples

cibersortx計算細胞組分

我的資料是microarray,所以最後那個箭頭不勾選。

結果可見網頁上的輸出比較侷限,沒有好看的圖,分組資料比較等功能也沒有,所以接下來用r來實現cibersortx。

(1)lm22.txt(22種免疫細胞的參考marker基因表達)

(ps官網下cibersort.r需要先request permission……我從下面這個**拿到了✅

source("cibersort.r")

# define lm22 file

lm22.file

exp.file

tme.results = cibersort(lm22.file, exp.file, perm = 1000, qn = true)

# output cibersort results

write.table(tme.results, "tme.results.output.txt",

sep = "\t", row.names = t, col.names = t, quote = f)

有報錯報錯:行名不能重複

解決:debug發現rownames裡有4個不是unique。。。but我的matrix是用r生成的,所以rownames確實是不重複的。。我把角標「gene」刪掉之後這一步就沒有報錯了。

有報錯x2

報錯:缺乙個包

解決:biocmanager::install("preprocesscore")

結果r執行結果與網頁輸出結果有一丟丟不同。可能原因是網頁的置換次數perm我沒有設定(為0),而**perm=1000。

下面出圖

# boxplot

library(ggpubr)

library(ggthemes)

x=tme.results[,1:22] #22 cell types

plot.info=data.frame(celltype,composition)

colnames(plot.info)=col

ggboxplot(

plot.info,

x = "celltype",

y = "composition",

color = "black",

fill = "celltype",

xlab = "",

ylab = "cell composition",

main = "tme cell composition"

theme_base() +

theme(axis.text.x = element_text(

angle = 90,

hjust = 1,

vjust = 1

箱線圖# boxplot by different samples(bone/brain/lung)

ggboxplot(

plot.info,

x = "celltype",

y = "composition",

color = "black",

fill = "sampletype",

xlab = "",

ylab = "cell composition",

main = "tme cell composition group by sampletype"

stat_compare_means(

label = "p.signif",

method = "t.test",

ref.group = ".all.",

hide.ns = t

theme_base() +

theme(axis.text.x = element_text(

angle = 90,

hjust = 1,

vjust = 1

箱線圖2

## 修改

ggboxplot(

plot.info2,

x = "shortst",

y = "composition",

color = "black",

fill = "sampletype",

xlab = "",

ylab = "cell composition",

main = "tme cell composition group by sampletype",

facet.by = "celltype",

stat_compare_means(

label = "p.signif",#顯著性水平,即用不同數量的 * 表示顯著性水平

label.y=0.25,

method = "t.test",

ref.group = ".all.",

hide.ns = t

theme_base() +

theme(axis.text.x = element_text(

angle = 90,

hjust = 1,

vjust = 1

箱線圖2 修改(注意這裡的統計是對的)

在箱線圖2中,所謂的p-value(用*表示顯著性水平)是每乙個celltype與所有組別的均值 的t-test,比如b cells memory組有「****」,指的是b cells memory組與全部資料的均值 之間存在****的顯著,而不是b cells memory組內部bone/brain/lung之間的統計學差異。

而有分析意義的是每乙個cell type中,bone/brain/lung之間的統計學差異。因此需要做修改。

(最後這個圖還是不夠美觀啊(sigh?

物理搬磚問題 搬磚姿勢 風法

1 前言 這個角色在男魔法裡面應該是最快的了,不管是技能範圍,還是技能釋放時間,都是又大又快的,加上有兩個跑圖技能,能夠更加的流暢搬磚,也不怎麼吃裝備,所以一直以來,都深受搬磚玩家的熱愛,那麼這個角色該如何搬磚呢,請看下面 2 裝備 稱號 海洋霸主 買今年年套稱號或者去年的國慶稱號,那個便宜買那個 ...

搬磚 動態規劃

小易有n塊磚塊,每一塊磚塊有乙個高度。小易希望利用這些磚塊堆砌兩座相同高度的塔。為了讓問題簡單,磚塊堆砌就是簡單的高度相加,某一塊磚只能使用在一座塔中一次。小易現在讓能夠堆砌出來的兩座塔的高度盡量高,小易能否完成呢。輸入描述 輸入包括兩行 第一行為整數n 1 n 50 即一共有n塊磚塊 第二行為n個...

ros 簡介(搬磚)

今天開始入坑ros 1977年9月,intel公司創始人羅伯特 諾伊斯撰文預言 計算機將走進千家萬戶。四十年過去了,我們有目共睹,這個預言早就變成了現實!2007年1月,比爾 蓋茨在 科學美國人 上撰文預言 機械人即將重複個人電腦崛起的道路,走進千家萬戶。十年過去了,我們有目共睹,這個預言正將變成現...