Browse Source

Merge branch 'dev'

main
marcelcosta 2 years ago
parent
commit
dbb8e1ed0d
1 changed files with 2 additions and 2 deletions
  1. +2
    -2
      BDAccess/app.R

+ 2
- 2
BDAccess/app.R

@ -1025,8 +1025,8 @@ server <- function(input, output) {
for (id in names){
print(id)
iso<-sampleNames(gs)[grepl(id, sampleNames(gs)) & grepl("iso",sampleNames(gs))]
ab<-sampleNames(gs)[grepl(id, sampleNames(gs)) & grepl("ab",sampleNames(gs))]
iso<-sampleNames(gs)[grepl(id, sampleNames(gs)) & grepl("iso|Iso|ISO",sampleNames(gs))]
ab<-sampleNames(gs)[grepl(id, sampleNames(gs)) & grepl("ab|Ab|AB",sampleNames(gs))]
g1<-ggcyto_arrange(autoplot(gs[[ab]], nodes_parent, bins=128), nrow=1)
g2<-ggcyto_arrange(autoplot(gs[[iso]], nodes_cd8, bins=64), nrow=1)

Loading…
Cancel
Save