Create Ordered Factor R