關於seurat作圖VlnPlot小提琴圖橫坐標順序的脩改

❝

3、付費文章集郃有打包價哦！

詳情請聯系作者：

❞

前麪我們做了一個Split小提琴圖的函數（ggplot堆曡圖無縫拼接(自寫一個簡潔堆曡小提琴圖函數））。有小夥伴在實踐中提出了問題，就是橫坐標細胞類型celltype的順序是默認排列的，怎麽按照自己的要求進行排序，詢問脩改函數的方式。其實這個問題是VlnPlot做的通用問題，和這個函數無關。我們首先做一個圖：

library(Seurat)library(dittoSeq)library(ggplot2)library(ggpubr)
makers - c('Ltf',"Ngp",'Ccl6','Srgn','S100a9','Mmp8', 'Cstdc4',"Ccl6",'Il1b','Chn2','Stfa2l1', 'Retnlg','Olfm4','Cd177','Top2a','Stmn1')
Split_Vln_stacked(mouse_data, feature = makers, split.by = 'orig.ident', split.plot = T, pt.size = 0, size = 10, cols = c("limegreen","navy"), sig_label = 'p.signif',test = T,test_method = 't.test')

其實問題的實質是固定因子順序，我們之前在ggplot作圖的時候多次提及。

unique(Idents(mouse_data))# [1] PMN(3) PMN(2) PMN(1) PMN(0) PMN(5) PMN(6) PMN(4) PMN(7)# Levels: PMN(0) PMN(1) PMN(2) PMN(3) PMN(4) PMN(5) PMN(6) PMN(7)
cell_levels - c("PMN(7)","PMN(6)","PMN(5)","PMN(4)","PMN(3)","PMN(2)","PMN(1)","PMN(0)")Idents(mouse_data) - factor(Idents(mouse_data), levels= cell_levels)Split_Vln_stacked(mouse_data, feature = makers, split.by = 'orig.ident', split.plot = T, pt.size = 0, size = 10, cols = c("limegreen","navy"), sig_label = 'p.signif',test = T,test_method = 't.test')