library(RTextTools)
corpus <- wizard_read_data(system.file("data/NYTimes.csv.gz",package="RTextTools"),
textColumns=c("Title","Subject"), codeColumn="Topic.Code", trainSize=75,
testSize=25, virgin=FALSE)
results <- wizard_train_classify(corpus, c("SVM", "MAXENT"))
Run the code above in your browser using DataLab