as.categorical function

Convert data type to a factor if it's not already