Below are the scripts
> library(sqldf) > turnover = read.csv(\"turnover.csv\") > names(turnover) [1] \"Report.Date\" \"PersID\" \"S
You can also use
library(sqldf) turnover <- read.csv("turnover.csv", header=TRUE, check.names=FALSE) #Leave Names Alone names(turnover) <- gsub(x = names(turnover), pattern = " ", replacement = "_") # Replace Var Name blank with _