Returns the Progeny Model — getModel • progeny
Description: This function is designed for getting a model matrix with top significant genes for each pathway

# Returns the Progeny Model

Source: `R/progenySuppFunc.r`
`getModel.Rd`

This function is designed for getting a model matrix with top significant genes for each pathway

    getModel(organism = "Human", top = 100)

## Arguments

organism | "Human" or "Mouse" taken from the main function's argument. Default to "Human"
top | Desired top number of genes for each pathway according to their significance(p.value). Default to 100

## Value

This function returns model matrix according to the top n significant

## Examples

    #getting a model matrix according to the desired top n significant
    model <- getModel("Human", top=100)