x = data.frame(gene=c(1, 2, 3, 4, 5),
pvalue=c(0.01, 1, 1, 0.1, 1),
effectsize=c(-2, 0.25, 0.5, 1, 0.25))
print(x, row.names = FALSE)
print(rankscore(x, sort1 = -1*x$pvalue, sort2 = abs(x$effectsize),
sort3 = x$gene, colname="score") |>
arrange(desc(score)), row.names = FALSE)
Run the code above in your browser using DataLab