PID of current job: 1795353
mSet<-InitDataObjects(“conc”, “roc”, FALSE)
mSet<-Read.TextData(mSet, “Replacing_with_your_file_path”, “rowu”, “disc”);
mSet<-SanityCheckData(mSet)
mSet<-SanityCheckData(mSet)
mSet<-RemoveMissingPercent(mSet, percent=0.8)
mSet<-ImputeMissingVar(mSet, method=“knn_var”)
mSet<-PreparePrenormData(mSet)
mSet<-Normalization(mSet, “NULL”, “LogNorm”, “ParetoNorm”, ratio=FALSE, ratioNum=20)
mSet<-PlotNormSummary(mSet, “norm_0_”, “png”, 72, width=NA)
mSet<-PlotSampleNormSummary(mSet, “snorm_0_”, “png”, 72, width=NA)
mSet<-SetAnalysisMode(mSet, “explore”)
mSet<-PrepareROCData(mSet)
mSet<-PerformCV.explore(mSet, “svm”, “svm”, 2)
mSet<-PlotProbView(mSet, “cls_prob_0_”, “png”, 72, -1, 0, 0)
mSet<-PlotImpBiomarkers(mSet, “cls_imp_0_”, “png”, 72, -1, “freq”, 15);
mSet<-PlotAccuracy(mSet,
“cls_accu_0_”, “png”, 72)
mSet<-PlotROC(mSet, “cls_roc_0_”, “png”, 72, 0, “threshold”, 0, 0, “fpr”, 0.5)
mSet<-PlotImpBiomarkers(mSet, “cls_imp_1_”, “png”, 72, 1, “freq”, 15);
this is the commend I did but, it does not display significant features