# NOT RUN {
# Load Mouse gene expression data
# Data contains selected samples from a heterogenous WNT Mouse model
data(WNT_Mouse_Expr)
# Generate Subtype Predictions
SubtypePreds<-MM2S.mouse(InputMatrix=WNT_Mouse_Expr[2:3],parallelize=2, seed = 12345)
# Generate Heatmap of Predictions
PredictionsHeatmap(InputMatrix=SubtypePreds$Predictions, pdf_output=TRUE,pdfheight=5,pdfwidth=5)
# Generate projections of the selected genesets from
# Mouse model onto the training set, using Principal Component Analysis (PCA)
PCARender(GSVAmatrixTesting=SubtypePreds$RankMatrixTesting,
GSVAmatrixTraining=SubtypePreds$RankMatrixTraining)
# }
Run the code above in your browser using DataLab