code to classify the NY times example from RTextTools