mpone function

Converts the first two levels of a factor into the numeric values -1 and +1