johrpan/ubigen
1
0
Fork 0
mirror of https://github.com/johrpan/ubigen.git synced 2025-10-26 19:57:24 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Use GeTMM normalization

Browse source
This commit is contained in:
Elias Projahn 2022-09-21 18:47:58 +02:00
parent c97ee1ca30
commit f59a71b16c
3 changed files with 61 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

3
scripts/ranking.R
View file

@ -8,9 +8,6 @@ i_am("scripts/input.R")
data <- fread(here("scripts", "output", "results.csv"))
# Keep only the actual Ensembl ID for each gene.
data[, gene := stringr::str_split(gene, "\\.") |> purrr::map_chr(1)]
data[, score := 0.5 * above_95 +
0.25 * mean_expression_normalized +
-0.25 * sd_expression_normalized]