fix redundant sce conversion

KrishnaswamyLab · Oct 4, 2019 · 37b9dd7 · 37b9dd7
1 parent ebbcdfb
commit 37b9dd7
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/scprep/run/slingshot.py b/scprep/run/slingshot.py
@@ -47,15 +47,15 @@ def install(site_repository = None, update = False, version = None, verbose = Tr
         cluster_labels <- as.factor(cluster_labels)
 
         # Run Slingshot
-        sce <- slingshot(data, clusterLabels = cluster_labels,
+        sling <- slingshot(data, clusterLabels = cluster_labels,
                          start.clus = start_cluster, end.clus = end_cluster,
                          dist.fun = distance, omega = omega, lineages = lineages, shrink = shrink,
                          extend = extend, reweight = reweight, reassign = reassign, thresh = thresh,
                          maxit = max_iter, stretch = stretch,
                          smoother = smoother, shrink.method = shrink_method,
                          allow.breaks = allow_breaks)
-        list(pseudotime = slingPseudotime(sce),
-             curves = lapply(SlingshotDataSet(sce)@curves, function(curve) curve$s[curve$ord,]))
+        list(pseudotime = slingPseudotime(sling),
+             curves = lapply(sling@curves, function(curve) curve$s[curve$ord,]))
     """)