setInternet2(TRUE)
rhomedir<-Sys.getenv("R_HOME")
libdir<-paste(rhomedir,"/library",sep="")

local({r <- getOption("repos")
     r["CRAN"] <- "http://cran.r-project.org"
     options(repos=r)})

pkginstall <- function(x) {
  if (!x %in% installed.packages())
   {
install.packages(x)
   }
else
{
    remove.packages(x)
    install.packages(x)
}
   }

pkginstall("rJava")
pkginstall("RODBC")
pkginstall("RJDBC")
pkginstall("DBI")
pkginstall("monmlp")
pkginstall("AMORE")
pkginstall("XML")
pkginstall("pmml")
pkginstall("arules")
pkginstall("caret")
pkginstall("reshape")
pkginstall("plyr")
pkginstall("foreach")
pkginstall("iterator")

q("no", 0, FALSE)