Create categoricalpredictor.R

Implementing the categorical predictor class