diff R_test.R @ 0:8a7ee199a315 draft

Uploaded

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/R_test.R	Tue Oct 28 06:25:06 2014 -0400
@@ -0,0 +1,16 @@
+systemUser <- system("whoami",T)
+rVersion <- R.version.string
+
+cat( "Starting R_test\n" )	
+cat( rVersion, "\n" )
+cat( systemUser, "\n" )
+
+#qdnaseqVersion <- packageDescription( "QDNAseq" )$Version
+
+packs <- c()
+for ( pack in packs ){
+	catMsg( c("Loading ", pack) )
+	library( pack )
+}
+
+q(status=0)