Description Usage Arguments Value Author(s) References Examples
To enable quantitative analysis of the methylation patterns within individual Methylation Correlation Blocks across many samples, a single metric to define the methylated pattern of multiple CpG sites within each block. Compound scores which calculated all CpGs within individual Methylation Correlation Blocks by linear, SVM or elastic-net model Predict values were used as the compound methylation values of Methylation Correlation Blocks.
1 | metricMCB(MCBset,training_set,Surv,testing_set,Surv.new,Method,silent)
|
MCBset |
Methylation Correlation Block information returned by the IndentifyMCB function. |
training_set |
methylation matrix used for training the model in the analysis. |
Surv |
Survival function contain the survival information for training. |
testing_set |
methylation matrix used in the analysis. This can be missing then training set itself will be used as testing set. |
Surv.new |
Survival function contain the survival information for testing. |
Method |
model used to calculate the compound values for multiple Methylation correlation blocks. Options include "svm" "cox" and "enet". The default option is SVM method. |
silent |
Ture indicates that processing information and progress bar will be shown. |
Object of class list
with elements (XXX will be replaced with the model name you choose):
MCB_XXX_matrix_training | Prediction results of model for training set. |
MCB_XXX_matrix_test_set | Prediction results of model for test set. |
XXX_auc_results | AUC results for each model. |
best_XXX_model | Model object for the model with best AUC. |
maximum_auc | Maximum AUC for the whole generated models. |
Xin Yu
Xin Yu et al. 2019 Predicting disease progression in lung adenocarcinoma patients based on methylation correlated blocks using ensemble machine learning classifiers (under review)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | #import datasets
data(demo_survival_data)
datamatrix<-create_demo()
data(demo_MCBinformation)
#select MCB with at least 3 CpGs.
demo_MCBinformation<-demo_MCBinformation[demo_MCBinformation[,"CpGs_num"]>2,]
trainingset<-colnames(datamatrix) %in% sample(colnames(datamatrix),0.6*length(colnames(datamatrix)))
testingset<-!trainingset
#create the results using Cox regression.
mcb_cox_res<-metricMCB(MCBset = demo_MCBinformation,
training_set = datamatrix[,trainingset],
Surv = demo_survival_data[trainingset],
testing_set = datamatrix[,testingset],
Surv.new = demo_survival_data[testingset],
Method = "cox"
)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.