#=========================================================== # script : a project # author : vitor chagas last updated : 20120318 #=========================================================== #----------------------------------------------------------- # create & set workspace folder #----------------------------------------------------------- workdir <- "~/R-projects/a project" dir.create(workdir, recursive=TRUE) setwd(workdir) rm(workdir) #----------------------------------------------------------- # install & load necessary packages #----------------------------------------------------------- necessary <- c('sqldf', 'actuar') installed <- necessary %in% .packages(all.available=TRUE) # install if (length(necessary[!installed])>=1) install.packages(necessary[!installed]) # load for(pkg in necessary) library(pkg, character.only=TRUE) rm(necessary, installed, pkg)
O principal objectivo deste "template" é tentar reduzir a intervenção do utilizador necessária para executar o programa que se segue.
Assim é criada a pasta de trabalho e é assegurada a instalação das bibliotecas utilizadas.
Sem comentários:
Enviar um comentário