This function is designed for getting a model matrix with top significant genes for each pathway
getModel(organism = "Human", top = 100, decoupleR = F)
"Human" or "Mouse" taken from the main function's argument. Default to "Human"
Desired top number of genes for each pathway according to their significance(p.value). Default to 100
if TRUE, the model matrix is goign to be generated with a format makes it directlz compatible with the decoupleR package
This function returns model matrix according to the top n significant
#getting a model matrix according to the desired top n significant
model <- getModel("Human", top=100)