library(dplyr) load('sce_out_for_heatmap_all.Rdata') top10 <- sce.markers %>% group_by(cluster) %>% top_n(10, avg_logFC) DoHeatmap(sce,top10$gene,size=3) plot_zoom_png 但是这个图在后期调整时会遇到很多障碍,因此最好用pheatmap重新画一下 如何用Pheatmap画这个结果? 其实,画一个热图...
rm(list=ls())options(warn=-1)options(stringsAsFactors=F)install.packages('Seurat')library(Seurat)library(stringr)library(dplyr)load('sce_out_for_heatmap_all.Rdata') top10<-sce.markers%>%group_by(cluster)%>%top_n(10, avg_logFC)DoHeatmap(sce,top10$gene,size=3) 但是这个图在后期调整时...
解码器在播放时则是读取一段一段的 GOP 进行解码后读取画面再渲染显示。GO