setwd("~/Analysis/EmAnalise/UpdateR")

configFileNames <- c("Rconsole", "Rprofile.site")
file.copy(configFileNames, path.expand(R.home("etc")), overwrite = TRUE)


toInstall <- read.table("oldPackages.txt",header=TRUE,colClass="character")
packs<-as.list(toInstall[['x']])

lapply(packs, function(p) {
  install.packages(p,dep=TRUE,ask=FALSE,Ncpus=4)
#   print(p)
})
update.packages(ask=FALSE,checkBuilt=TRUE)