From 19ac267812815d397b67299c7ffc0a0cb3196b86 Mon Sep 17 00:00:00 2001 From: jiang548 Date: Mon, 16 May 2022 15:20:54 -0400 Subject: [PATCH] stage2 typo --- script/network/bstest2.r | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/script/network/bstest2.r b/script/network/bstest2.r index 604fe8f..a931427 100644 --- a/script/network/bstest2.r +++ b/script/network/bstest2.r @@ -182,7 +182,7 @@ cat(paste0("Please reset the ncores parameter to less than ", floor(memory/maxme a <- chron(time=walltime, format=c(times="h:m:s")) gene_trunk <- floor(0.5*(3600*hours(a)+60*minutes(a)+seconds(a))/maxlap) -cat(paste0("We will include ", gene_trunk, " genes in one script\n")) +cat(paste0("We will include ", min(gene_trunk, ncol(y)), " genes in one script\n")) write.table(gene_trunk, file="gene_trunk_stage2", row.names=F, col.names=F, quote=F, sep=" ")