Tweaked classification.R

But predict still not working for class posteriors for documents,
especially not for non-uniform class priors.