Merge pull request #107 from navinlabcode/vst_log

Kris69w · web-flow · commit 9f0d6717d46b · 2025-07-11T16:23:13.000-05:00
update runVst.R set log base to 2
diff --git a/R/runVst.R b/R/runVst.R
@@ -49,7 +49,7 @@ runVst <- function(scCNA,
         varbin_counts_df[varbin_counts_df == 0] <- 1e-4
         counts_df_ft <- as.data.frame(apply(varbin_counts_df,
                                             2,
-                                            function(x) log(x)))
+                                            function(x) log(x, base = 2)))
     }
 
     counts_df_ft <- as.data.frame(counts_df_ft)

Original file line number	Diff line number	Diff line change
`@@ -49,7 +49,7 @@ runVst <- function(scCNA,`
`49`	`49`	`varbin_counts_df[varbin_counts_df == 0] <- 1e-4`
`50`	`50`	`counts_df_ft <- as.data.frame(apply(varbin_counts_df,`
`51`	`51`	`2,`
`52`		`- function(x) log(x)))`
	`52`	`+ function(x) log(x, base = 2)))`
`53`	`53`	`}`
`54`	`54`
`55`	`55`	`counts_df_ft <- as.data.frame(counts_df_ft)`