comparison Seurat.R @ 9:c4db6ec33fec draft

"planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/seurat commit 7681c9101062f58ac4eb296a98b1644d4ed2340a"
author iuc
date Thu, 21 Oct 2021 15:57:20 +0000
parents 764f076e9d52
children fab6ff46e019
comparison
equal deleted inserted replaced
8:828324f3292f 9:c4db6ec33fec
113 #+ echo = FALSE 113 #+ echo = FALSE
114 if (showcode == TRUE && heatmaps == TRUE) print("Marker Genes") 114 if (showcode == TRUE && heatmaps == TRUE) print("Marker Genes")
115 #+ echo = `showcode`, warning = `warn`, include = `heatmaps` 115 #+ echo = `showcode`, warning = `warn`, include = `heatmaps`
116 markers <- Seurat::FindAllMarkers(seuset, only.pos = TRUE, min.pct = min_pct, logfc.threshold = logfc_threshold) 116 markers <- Seurat::FindAllMarkers(seuset, only.pos = TRUE, min.pct = min_pct, logfc.threshold = logfc_threshold)
117 top10 <- dplyr::group_by(markers, cluster) 117 top10 <- dplyr::group_by(markers, cluster)
118 top10 <- dplyr::top_n(top10, 10, avg_logFC) 118 top10 <- dplyr::top_n(top10, 10, avg_log2FC)
119 Seurat::DoHeatmap(seuset, features = top10$gene) 119 Seurat::DoHeatmap(seuset, features = top10$gene)
120 # nolint end 120 # nolint end