Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Lars Velten
RNAMagnet
Commits
1b63ad4f
Commit
1b63ad4f
authored
Jul 10, 2019
by
Lars Velten
Browse files
closed a bracked
parent
9bac1ca5
Changes
1
Hide whitespace changes
Inline
Side-by-side
R/RNAMagnet.R
View file @
1b63ad4f
...
@@ -84,7 +84,7 @@ RNAMagnetSignaling <- function(seurat, neighborhood.distance = NULL, neighborhoo
...
@@ -84,7 +84,7 @@ RNAMagnetSignaling <- function(seurat, neighborhood.distance = NULL, neighborhoo
RNAMagnetBase
<-
function
(
seurat
,
anchors
=
NULL
,
neighborhood.distance
=
NULL
,
neighborhood.gradient
=
NULL
,
.k
=
10
,
.x0
=
0.5
,
.minExpression
,
.version
=
"latest"
,
.cellularCompartment
,
.manualAnnotation
=
"Correct"
,
.symmetric
=
F
)
{
RNAMagnetBase
<-
function
(
seurat
,
anchors
=
NULL
,
neighborhood.distance
=
NULL
,
neighborhood.gradient
=
NULL
,
.k
=
10
,
.x0
=
0.5
,
.minExpression
,
.version
=
"latest"
,
.cellularCompartment
,
.manualAnnotation
=
"Correct"
,
.symmetric
=
F
)
{
cat
(
"Setting everything up...\n"
)
cat
(
"Setting everything up...\n"
)
if
(
grepl
(
"^3"
,
Biobase
::
package.version
(
"Seurat"
))
{
if
(
grepl
(
"^3"
,
Biobase
::
package.version
(
"Seurat"
))
)
{
seurat.ident
<-
Idents
(
seurat
)
seurat.ident
<-
Idents
(
seurat
)
seurat.cell.names
<-
colnames
(
seurat
)
seurat.cell.names
<-
colnames
(
seurat
)
seurat.pca
<-
Embeddings
(
seurat
,
reduction
=
"pca"
)
seurat.pca
<-
Embeddings
(
seurat
,
reduction
=
"pca"
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment