source("http://bioconductor.org/biocLite.R") major <- as.numeric(R.Version()$major) minor <- as.numeric(R.Version()$minor) if (major == 2 && (minor == 14)) { ##ok } else { stop("You must be running R version 2.14") } rversion <- paste(R.Version()$major, as.integer(R.Version()$minor), sep=".") scratchRepos <- paste("http://bioconductor.org/scratch-repos/", rversion, sep="") allRepos <- c(scratchRepos, biocinstallRepos()) pkgInstall <- function (package) { install.packages(package, repos = allRepos) }