- xfftrain <- as.ffdf(read.csv("train.csv", nrows = 1000, , colClasses = rep("factor", 24), header = TRUE))
- xfftest <- as.ffdf(read.csv("test.csv", nrows = 1000, , colClasses = rep("factor", 23), header = TRUE))
- train <- read.csv.ffdf(x = xfftrain, file = "train.csv", VERBOSE = TRUE, skip = 1000)
- test <- read.csv.ffdf(x = xfftest, file = "test.csv", VERBOSE = TRUE, skip = 1000)