library(mlr3verse)
library(caret)
library(BioM2)
data=MethylData_Test
set.seed(1)
part=unlist(createDataPartition(data$label,p=0.8))#Split data
predict=baseModel(trainData=data[part,1:10],
testData=data[-part,1:10],
classifier = 'svm')#Use 10 features to make predictions,Learner uses svm
Run the code above in your browser using DataLab