Browse code

Bugs fixes in Scanpy

npervaiz authored on 02/01/2023 19:12:26
Showing 1 changed files
... ...
@@ -27,10 +27,10 @@ plotScanpyMarkerGenesViolin
27 27
 data(scExample, package = "singleCellTK")
28 28
 \dontrun{
29 29
 sce <- runScanpyNormalizeData(sce, useAssay = "counts")
30
+sce <- runScanpyFindHVG(sce, useAssay = "scanpyNormData", method = "seurat")
30 31
 sce <- runScanpyScaleData(sce, useAssay = "scanpyNormData")
31
-sce <- runScanpyFindHVG(sce, useAssay = "scanpyScaledData", method = "seurat")
32
-sce <- runScanpyPCA(sce, useAssay = "scanpyNormData")
33
-sce <- runScanpyFindClusters(sce, useAssay = "counts")
32
+sce <- runScanpyPCA(sce, useAssay = "scanpyScaledData")
33
+sce <- runScanpyFindClusters(sce, useReducedDim = "scanpyPCA")
34 34
 sce <- runScanpyFindMarkers(sce, colDataName = "Scanpy_louvain_1" )
35 35
 plotScanpyMarkerGenesViolin(sce, groups = '0')
36 36
 }
Browse code

Minor edits to scanpy functions

npervaiz authored on 22/12/2022 12:16:44
Showing 1 changed files
... ...
@@ -27,6 +27,8 @@ plotScanpyMarkerGenesViolin
27 27
 data(scExample, package = "singleCellTK")
28 28
 \dontrun{
29 29
 sce <- runScanpyNormalizeData(sce, useAssay = "counts")
30
+sce <- runScanpyScaleData(sce, useAssay = "scanpyNormData")
31
+sce <- runScanpyFindHVG(sce, useAssay = "scanpyScaledData", method = "seurat")
30 32
 sce <- runScanpyPCA(sce, useAssay = "scanpyNormData")
31 33
 sce <- runScanpyFindClusters(sce, useAssay = "counts")
32 34
 sce <- runScanpyFindMarkers(sce, colDataName = "Scanpy_louvain_1" )
Browse code

bug fixes

feature parameter added to plots

npervaiz authored on 03/11/2022 15:58:29
Showing 1 changed files
... ...
@@ -4,7 +4,7 @@
4 4
 \alias{plotScanpyMarkerGenesViolin}
5 5
 \title{plotScanpyMarkerGenesViolin}
6 6
 \usage{
7
-plotScanpyMarkerGenesViolin(inSCE, groups = NULL, nGenes = 10)
7
+plotScanpyMarkerGenesViolin(inSCE, groups = NULL, features = NULL, nGenes = 10)
8 8
 }
9 9
 \arguments{
10 10
 \item{inSCE}{Input \code{SingleCellExperiment} object.}
... ...
@@ -12,6 +12,9 @@ plotScanpyMarkerGenesViolin(inSCE, groups = NULL, nGenes = 10)
12 12
 \item{groups}{The groups for which to show the gene ranking. Default \code{NULL}
13 13
 means that all groups will be considered.}
14 14
 
15
+\item{features}{List of genes to plot. Is only useful if interested in a 
16
+custom gene list}
17
+
15 18
 \item{nGenes}{Number of genes to show. Default \code{10}}
16 19
 }
17 20
 \value{
Browse code

Bug fixes and documentation

npervaiz authored on 02/11/2022 12:13:26
Showing 1 changed files
... ...
@@ -26,7 +26,7 @@ data(scExample, package = "singleCellTK")
26 26
 sce <- runScanpyNormalizeData(sce, useAssay = "counts")
27 27
 sce <- runScanpyPCA(sce, useAssay = "scanpyNormData")
28 28
 sce <- runScanpyFindClusters(sce, useAssay = "counts")
29
-sce <- runScanpyFindMarkers(sce, colDataName = "Scanpy_louvain" )
29
+sce <- runScanpyFindMarkers(sce, colDataName = "Scanpy_louvain_1" )
30 30
 plotScanpyMarkerGenesViolin(sce, groups = '0')
31 31
 }
32 32
 }
Browse code

Scanpy wrapper functions

npervaiz authored on 12/10/2022 14:09:33
Showing 1 changed files
1 1
new file mode 100644
... ...
@@ -0,0 +1,32 @@
1
+% Generated by roxygen2: do not edit by hand
2
+% Please edit documentation in R/scanpyFunctions.R
3
+\name{plotScanpyMarkerGenesViolin}
4
+\alias{plotScanpyMarkerGenesViolin}
5
+\title{plotScanpyMarkerGenesViolin}
6
+\usage{
7
+plotScanpyMarkerGenesViolin(inSCE, groups = NULL, nGenes = 10)
8
+}
9
+\arguments{
10
+\item{inSCE}{Input \code{SingleCellExperiment} object.}
11
+
12
+\item{groups}{The groups for which to show the gene ranking. Default \code{NULL}
13
+means that all groups will be considered.}
14
+
15
+\item{nGenes}{Number of genes to show. Default \code{10}}
16
+}
17
+\value{
18
+plot object
19
+}
20
+\description{
21
+plotScanpyMarkerGenesViolin
22
+}
23
+\examples{
24
+data(scExample, package = "singleCellTK")
25
+\dontrun{
26
+sce <- runScanpyNormalizeData(sce, useAssay = "counts")
27
+sce <- runScanpyPCA(sce, useAssay = "scanpyNormData")
28
+sce <- runScanpyFindClusters(sce, useAssay = "counts")
29
+sce <- runScanpyFindMarkers(sce, colDataName = "Scanpy_louvain" )
30
+plotScanpyMarkerGenesViolin(sce, groups = '0')
31
+}
32
+}