seurat對象中細胞identity的獲取、設置與操縱

前兩天遇到了一個小問題:初步注釋細胞發現,使用RenameIdents后細胞類型的levels與我想要的排序不符。例如,我實際得到的level為: cancer_cell1 T_cells cancer_cell2 cancer_cell3 B_cells.但是我想要把cancer_cell cluster與免疫細胞的排列成:cancer_cell1 cancer_cell2 cancer_cell3 T_cells B_cells。搜所了一下,結果方法很簡單。


# Reorder identity classes

levels(x = pbmc_small)

#> [1] "B" "A" "C"

levels(x = pbmc_small) <- c('C', 'A', 'B')

levels(x = pbmc_small)

#> [1] "C" "A" "B"

seurat處理identity的函數有


Idents(object, ...)

Idents(object, ...) <- value

RenameIdents(object, ...)

ReorderIdent(object, var, ...)

SetIdent(object, ...)

StashIdent(object, save.name, ...)

# S3 method for Seurat

Idents(object, ...)

# S3 method for Seurat

Idents(object, cells = NULL, drop = FALSE, ...) <- value

# S3 method for Seurat

ReorderIdent(

  object,

  var,

  reverse = FALSE,

  afxn = mean,

  reorder.numeric = FALSE,

  ...

)

# S3 method for Seurat

RenameIdents(object, ...)

# S3 method for Seurat

SetIdent(object, cells = NULL, value, ...)

# S3 method for Seurat

StashIdent(object, save.name = "orig.ident", ...)

# S3 method for Seurat

droplevels(x, ...)

# S3 method for Seurat

levels(x)

# S3 method for Seurat

levels(x) <- value


# 獲取細胞identy

Idents(pbmc_small)

# 設置細胞identy

# 可以用來指定某些細胞為新的名稱

#例如將前4個細胞的identity修改為a,其余不變

Idents(pbmc_small, cells = 1:4) <- 'a'

head(Idents(pbmc_small))

# 使用matadata來設置identity

colnames(pbmc_small[[]])

Idents(pbmc_small) <- 'RNA_snn_res.1'

levels(pbmc_small)

# 修改細胞identity的名字

# 可以提供任意數量,例如,原始的level有20,修改2個,剩余的18個保持不變

levels(pbmc_small)

pbmc_small <- RenameIdents(pbmc_small, '0' = 'A', '2' = 'C')

levels(pbmc_small)

# 這里也可以寫成

identityMapping <- c('0' = 'A', '2' = 'C')

pbmc_small <- RenameIdents(pbmc_small, identityMapping )

# 使用SetIdent設置細胞的identity

cells.use <- WhichCells(pbmc_small, idents = '1')

pbmc_small <- SetIdent(pbmc_small, cells = cells.use, value = 'B')

#將細胞的identity加到matadata上

head(pbmc_small[[]])

pbmc_small <- StashIdent(pbmc_small, save.name = 'idents')

head(pbmc_small[[]])

# 獲取seurat對象的細胞identity的水平

levels(x = pbmc_small)

# 調整細胞identity的水平

levels(x = pbmc_small)

levels(x = pbmc_small) <- c('C', 'A', 'B')

levels(x = pbmc_small)

感覺上面的函數基本上涵蓋了操縱identity的所有需求。

如有錯誤,可以在評論初指正。

參考

?著作權歸作者所有,轉載或內容合作請聯系作者
平臺聲明:文章內容(如有圖片或視頻亦包括在內)由作者上傳并發布,文章內容僅代表作者本人觀點,簡書系信息發布平臺,僅提供信息存儲服務。
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市,隨后出現的幾起案子,更是在濱河造成了極大的恐慌,老刑警劉巖,帶你破解...
    沈念sama閱讀 228,156評論 6 531
  • 序言:濱河連續發生了三起死亡事件,死亡現場離奇詭異,居然都是意外死亡,警方通過查閱死者的電腦和手機,發現死者居然都...
    沈念sama閱讀 98,401評論 3 415
  • 文/潘曉璐 我一進店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人,你說我怎么就攤上這事。” “怎么了?”我有些...
    開封第一講書人閱讀 176,069評論 0 373
  • 文/不壞的土叔 我叫張陵,是天一觀的道長。 經常有香客問我,道長,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 62,873評論 1 309
  • 正文 為了忘掉前任,我火速辦了婚禮,結果婚禮上,老公的妹妹穿的比我還像新娘。我一直安慰自己,他們只是感情好,可當我...
    茶點故事閱讀 71,635評論 6 408
  • 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著,像睡著了一般。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發上,一...
    開封第一講書人閱讀 55,128評論 1 323
  • 那天,我揣著相機與錄音,去河邊找鬼。 笑死,一個胖子當著我的面吹牛,可吹牛的內容都是我干的。 我是一名探鬼主播,決...
    沈念sama閱讀 43,203評論 3 441
  • 文/蒼蘭香墨 我猛地睜開眼,長吁一口氣:“原來是場噩夢啊……” “哼!你這毒婦竟也來了?” 一聲冷哼從身側響起,我...
    開封第一講書人閱讀 42,365評論 0 288
  • 序言:老撾萬榮一對情侶失蹤,失蹤者是張志新(化名)和其女友劉穎,沒想到半個月后,有當地人在樹林里發現了一具尸體,經...
    沈念sama閱讀 48,881評論 1 334
  • 正文 獨居荒郊野嶺守林人離奇死亡,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內容為張勛視角 年9月15日...
    茶點故事閱讀 40,733評論 3 354
  • 正文 我和宋清朗相戀三年,在試婚紗的時候發現自己被綠了。 大學時的朋友給我發了我未婚夫和他白月光在一起吃飯的照片。...
    茶點故事閱讀 42,935評論 1 369
  • 序言:一個原本活蹦亂跳的男人離奇死亡,死狀恐怖,靈堂內的尸體忽然破棺而出,到底是詐尸還是另有隱情,我是刑警寧澤,帶...
    沈念sama閱讀 38,475評論 5 358
  • 正文 年R本政府宣布,位于F島的核電站,受9級特大地震影響,放射性物質發生泄漏。R本人自食惡果不足惜,卻給世界環境...
    茶點故事閱讀 44,172評論 3 347
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧,春花似錦、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 34,582評論 0 26
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至,卻和暖如春,著一層夾襖步出監牢的瞬間,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 35,821評論 1 282
  • 我被黑心中介騙來泰國打工, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留,地道東北人。 一個月前我還...
    沈念sama閱讀 51,595評論 3 390
  • 正文 我出身青樓,卻偏偏與公主長得像,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個殘疾皇子,可洞房花燭夜當晚...
    茶點故事閱讀 47,908評論 2 372

推薦閱讀更多精彩內容