From 80132e6c834e544d8ef89f55708e21b0bbc48739 Mon Sep 17 00:00:00 2001 From: Stephanie Spielman Date: Mon, 11 Nov 2024 11:43:27 -0500 Subject: [PATCH] missed argument name --- analyses/cell-type-ETP-ALL-03/scripts/05_cluster_evaluation.R | 2 +- .../cell-type-nonETP-ALL-03/scripts/05_cluster_evaluation.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/analyses/cell-type-ETP-ALL-03/scripts/05_cluster_evaluation.R b/analyses/cell-type-ETP-ALL-03/scripts/05_cluster_evaluation.R index 74bbec7cd..402a719ac 100644 --- a/analyses/cell-type-ETP-ALL-03/scripts/05_cluster_evaluation.R +++ b/analyses/cell-type-ETP-ALL-03/scripts/05_cluster_evaluation.R @@ -18,7 +18,7 @@ run_eval <- function(ind.lib) { summarise(avgSil = mean(silhouette_width), avgPur = mean(purity)) %>% data.frame() stability_df <- rOpenScPCA::calculate_stability( - x = seu, clusters = clusID.df, + x = seu, cluster_df = clusID.df, pc_name = "Xpca_", algorithm = "leiden", resolution = 1.0, objective_function = "modularity", seed = 10 diff --git a/analyses/cell-type-nonETP-ALL-03/scripts/05_cluster_evaluation.R b/analyses/cell-type-nonETP-ALL-03/scripts/05_cluster_evaluation.R index 1995ce421..f99b175cc 100644 --- a/analyses/cell-type-nonETP-ALL-03/scripts/05_cluster_evaluation.R +++ b/analyses/cell-type-nonETP-ALL-03/scripts/05_cluster_evaluation.R @@ -19,7 +19,7 @@ run_eval <- function(ind.lib) { summarise(avgSil = mean(silhouette_width), avgPur = mean(purity)) %>% data.frame() stability_df <- rOpenScPCA::calculate_stability( - x = seu, clusters = clusID.df, + x = seu, cluster_df = clusID.df, pc_name = "Xpca_", algorithm = "leiden", resolution = 1.0, objective_function = "modularity", seed = 10