diff --git a/RAutoClDs.R b/RAutoClDs.R
index 388f352..5188718 100644
--- a/RAutoClDs.R
+++ b/RAutoClDs.R
@@ -671,7 +671,7 @@ THEFT <- function(){
 				
 				##Editing the file for R processing
 				RAWDATID <- RAWDAT2[,1] %>%
-					as.matrix(.,stringsAsFactors = FALSE)
+					as.matrix(.)
 				
 				RAWDATNUM <- RAWDAT2[,-1] %>%
 					mapply(.,FUN = as.numeric) %>%