Rprofile.site

source("/opt/AskoR_bootstrap.R") 

library("GalaxyConnector")
.First <- function() if (interactive()) cat("\n   Welcome to the Galaxy R Interactive Environment!\n\nThe convenience functions gx_put(), gx_get(), and gx_save() are available to you to interact with your current Galaxy history.\n\n  gx_get(42) - Fetch dataset 42 from your Galaxy history. Returns the path where it is available\n  gx_put(filename) - Push a dataset to Galaxy\n  gx_save() - Save .RHistory, .RData to your Galaxy environment\n\nSome packages are pre-installed for you; RCurl, XML, shiny, ggvis, dplyr, tidyr, ggplot2, reshape2, RODBC, Bioconductor core packages, edgeR, Gviz, Rgraphviz, limma, DESeq2, cummeRbund, affay, Rsamtools")
options(encoding = "UTF-8")