#This first example is a basic
#example of how to perform getMutex.
data("A_example")
PMA <- getPM(A_example)
mismutex <- getMutex(A=A_example,PM=PMA)
# \donttest{
#The next example, is the same as the first one but,
# using a matrix of class Matrix.
data("A_Matrix")
A_Matrix <- A_Matrix[1:100,1:50]
#small for the example
PMA_Matrix <- getPM(A_Matrix)
mismutex <- getMutex(A=A_Matrix,PM=PMA_Matrix)
if (FALSE) {
#Finally, the last example, shows a real
#example of how to perform this function when using
#data from TCGA, Colon Adenocarcinoma in this case.
data("TCGA_COAD")
data("PM_COAD")
PM_COAD <- getMutex(TCGA_COAD, PM_COAD)
}
# }
Run the code above in your browser using DataLab