update (3b1b897d) · Commits · github_fork / DTUrtle

R/visualization.R

+9 −9

Original line number	Diff line number	Diff line
		@@ -646,9 +646,9 @@ plot_proportion_pheatmap <- function(dturtle, genes = NULL, sample_meta_table_co
		dir.create(file.path(savepath), recursive = TRUE)
		}

		if (length(valid_genes) > 10) {
		BiocParallel::bpprogressbar(BPPARAM) <- TRUE
		}
		# if (length(valid_genes) > 10) {
		# BiocParallel::bpprogressbar(BPPARAM) <- TRUE
		# }

		message("Creating ", length(valid_genes), " plots:")
		if (!BiocParallel::bpisup(BPPARAM)) {
		@@ -834,9 +834,9 @@ plot_transcripts_view <- function(dturtle, genes = NULL, gtf, genome, one_to_one
		}
		}

		if (length(valid_genes) > 10) {
		BiocParallel::bpprogressbar(BPPARAM) <- TRUE
		}
		# if (length(valid_genes) > 10) {
		# BiocParallel::bpprogressbar(BPPARAM) <- TRUE
		# }

		if (!is.null(savepath) && !dir.exists(savepath)) {
		dir.create(file.path(savepath), recursive = TRUE)
		@@ -1141,9 +1141,9 @@ plot_dimensional_reduction <- function(dturtle, reduction_df, genes = NULL, plot
		"proportions" = "Proportions"
		)

		if (length(valid_genes) > 10) {
		BiocParallel::bpprogressbar(BPPARAM) <- TRUE
		}
		# if (length(valid_genes) > 10) {
		# BiocParallel::bpprogressbar(BPPARAM) <- TRUE
		# }

		message("Creating ", length(valid_genes), " plots:")
		if (!BiocParallel::bpisup(BPPARAM)) {