updated on Fri Sep 13 10:09:41 2013
sampleData <- read.csv("huge-file.csv", header = TRUE, nrows = 5)
classes <- sapply(sampleData, class)
largeData <- read.csv("huge-file.csv", header = TRUE, colClasses = classes)
Only Load Data If Not Already Open in R
if(!exists("largeData")) {
largeData <- read.csv("huge-file.csv",header = TRUE)
}