Finished as.factor method
Added factor part into extraction methods