# \donttest{
#The next example, is the same as the first
# one but, using a matrix of class Matrix.
data("A_Matrix")
data("B_Matrix")
PMA <- getPM(A_Matrix)
PMB <- getPM(B_Matrix)
mismutex <- getMutexAB(A=A_Matrix, PM=PMA, B=B_Matrix, PMB = PMB)
#Finally, the last example, shows a
#real example of how to perform this function
# when using data from TCGA, Colon Adenocarcinoma in this case.
if (FALSE) {
data("TCGA_COAD_AMP")
data("AMP_COAD")
data("PM_TCGA_COAD_AMP")
data("PM_AMP_COAD")
mismutex <- getMutexAB(A=TCGA_COAD_AMP,
PMA=PM_TCGA_COAD_AMP,
B=AMP_COAD,
PMB = PM_AMP_COAD)
}
# }
Run the code above in your browser using DataLab