rawdata/template.r

source("utils.r")
## var.label <- c("foo","bar")

## DATASET
## -------
dataset <- read.table(file = "DATASET/DATASET.txt",
                      as.is = TRUE,
                      header = TRUE)
names(dataset) <- tolower(names(dataset))

dataset <- within(dataset, {

})
dataset <- dataset[order(dataset$id), ]
rownames(dataset) <- NULL
dim(dataset)
summary(dataset)

save("dataset", file = "../data/dataset.rda", compress = "bzip2")
bekkabratch/aps-clone documentation built on May 6, 2019, 9:52 a.m.