changeset 4:5717a09ed722 draft

Uploaded
author mingchen0919
date Tue, 28 Feb 2017 10:46:47 -0500
parents 55b76aecccec
children 23a539f4148c
files soft-threshold.R
diffstat 1 files changed, 14 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/soft-threshold.R	Mon Feb 27 23:00:03 2017 -0500
+++ b/soft-threshold.R	Tue Feb 28 10:46:47 2017 -0500
@@ -1,5 +1,18 @@
 #!/usr/binenv Rscript
 
+## Create the personal library if it doesn't exist. Ignore a warning if the directory already exists.
+dir.create(Sys.getenv("R_LIBS_USER"), showWarnings = FALSE, recursive = TRUE)
+## Install one package.
+install.packages("getopt", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu", dependencies = TRUE )
+install.packages("ggplot2", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+install.packages("ggdendro", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+install.packages("class", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+install.packages("cluster", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+install.packages("impute", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+install.packages("Hmisc", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+install.packages("WGCNA", Sys.getenv("R_LIBS_USER"), repos = "http://cran.case.edu" , dependencies = TRUE)
+
+
 # A command-line interface to WGCNA for use with galaxy
 
 
@@ -95,4 +108,4 @@
   xlab("R power") +
   ylab("Mean connectivity")
 
-dev.off()
\ No newline at end of file
+dev.off()