Changes between Version 5 and Version 6 of SOP/scRNA-seq/Slingshot
- Timestamp:
- 10/20/20 09:50:13 (4 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
SOP/scRNA-seq/Slingshot
v5 v6 49 49 library(ggthemes) 50 50 51 # this define the cluster color. You can change it with different color scheme. 51 52 my_color <- createPalette(length(levels(sce$ident)), c("#010101", "#ff0000"), M=1000) 52 53 names(my_color) <- unique(as.character(sce$ident)) … … 54 55 slingshot_df <- data.frame(colData(sce)) 55 56 56 # re-order y-axis for better figure: 57 slingshot_df$ident = factor(slingshot_df$ident, levels=c(4,2,1,0,3,5,6))57 # re-order y-axis for better figure: This should be tailored with your own cluster names 58 # slingshot_df$ident = factor(slingshot_df$ident, levels=c(4,2,1,0,3,5,6)) 58 59 59 60 ggplot(slingshot_df, aes(x = slingPseudotime_1, y = ident,