Open marco-luo928420 opened 2 years ago
Dear Mr.JUN,what a wonderful function of jjDotPlot,the plot is very amazing.Today,i wanna use your code to repeat the blog,but there is an error.i google it,but didn't find the answer. The following is the running log:
library(scRNAtoolVis) httest <- system.file("extdata", "htdata.RDS", package = "scRNAtoolVis") pbmc <- readRDS(httest)
pbmc$groups <- rep(c('stim','control'),each = 1319)
pbmc$celltype <- Seurat::Idents(pbmc)
data("top3pbmc.markers")
head(top3pbmc.markers,3)
p_val avg_log2FC pct.1 pct.2 p_val_adj cluster gene <dbl> <dbl> <dbl> <dbl> <dbl> <fct> <chr>
1 1.74e-109 1.07 0.897 0.593 2.39e-105 Naive CD4 T LDHB 2 1.17e- 83 1.33 0.435 0.108 1.60e- 79 Naive CD4 T CCR7 3 3.28e- 49 1.05 0.333 0.103 4.50e- 45 Naive CD4 T LEF1 # jjDotPlot(object = pbmc, gene = top3pbmc.markers$gene) Error: 'PercentAbove' is not an exported object from 'namespace:Seurat'
At last,thanks for you write this function,I can't wait to give you the little star!!!
I just fixed this error, you can re-install scRNAtoolVis. Thanks for your problem.
Problem solved, thanks!!!
Dear Mr.JUN,what a wonderful function of jjDotPlot,the plot is very amazing.Today,i wanna use your code to repeat the blog,but there is an error.i google it,but didn't find the answer. The following is the running log:
library(scRNAtoolVis) httest <- system.file("extdata", "htdata.RDS", package = "scRNAtoolVis") pbmc <- readRDS(httest)
add groups
pbmc$groups <- rep(c('stim','control'),each = 1319)
add celltype
pbmc$celltype <- Seurat::Idents(pbmc)
load markergene
data("top3pbmc.markers")
check
head(top3pbmc.markers,3)
A tibble: 3 x 7
Groups: cluster [1]
1 1.74e-109 1.07 0.897 0.593 2.39e-105 Naive CD4 T LDHB 2 1.17e- 83 1.33 0.435 0.108 1.60e- 79 Naive CD4 T CCR7 3 3.28e- 49 1.05 0.333 0.103 4.50e- 45 Naive CD4 T LEF1 # jjDotPlot(object = pbmc, gene = top3pbmc.markers$gene) Error: 'PercentAbove' is not an exported object from 'namespace:Seurat'
At last,thanks for you write this function,I can't wait to give you the little star!!!