domingo, 18 de março de 2012

"Template" para um projecto em R

Actualmente este é o modo como início um novo projecto em R.

#===========================================================
# 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