牛轉乾坤!新年快樂,小白來啃生信發*****~
上傳檔案要求
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月,比爾 蓋茨在 科學美國人 上撰文預言 機械人即將重複個人電腦崛起的道路,走進千家萬戶。十年過去了,我們有目共睹,這個預言正將變成現...