55 lines
3.2 KiB
Plaintext
55 lines
3.2 KiB
Plaintext
print(paste("***************** D4Science supported RStudio-as-a-Service *******************"))
|
|
print(paste(""))
|
|
print(paste("Welcome to the RStudio service offered by D4Science."))
|
|
print(paste(""))
|
|
print(paste("Any work produced by making use of assets made available by the D4Science infrastructure should acknowledge"))
|
|
print(paste("the support received and give credits. Please include the following reference:"))
|
|
print(paste(""))
|
|
print(paste("M. Assante et al. (2019) Enacting open science by D4Science."))
|
|
print(paste("Future Gener. Comput. Syst. 101: 555-563 10.1016/j.future.2019.05.063"))
|
|
print(paste(""))
|
|
print(paste("Please read the following instructions to maximise the exploitation of the RStudio environment."))
|
|
|
|
print(paste("*****************USAGE NOTES*******************"))
|
|
print(paste(""))
|
|
print(paste("*****************D4Science Workspace****************"))
|
|
print(paste("You can access your workspace under 'workspace' in hour home directory"))
|
|
print(paste(""))
|
|
print(paste("You can also access, read and write any folder of your workspace"))
|
|
print(paste("by loading - and using - the package 'd4storagehub4R'"))
|
|
print(paste("developed by E. Blondel, with source code available at https://github.com/eblondel/d4storagehub4R"))
|
|
# print(paste("To create the manager to interact with the Workspace, use the R code:"))
|
|
# print(paste(" storagehub = initStoragehubManager()"))
|
|
print(paste("For more info about methods available to interact with workspace,"))
|
|
print(paste("consult the documentation at ?d4storagehub4R::StoragehubManager"))
|
|
print(paste(""))
|
|
print(paste("It is recommended to save any worth maintaining file into the workspace to persist it."))
|
|
print(paste("The persistence of files stored elsewhere is not guaranteed."))
|
|
print(paste("***********************************************"))
|
|
print(paste(""))
|
|
print(paste("*****************Software upgrades and cloud facilities*******************"))
|
|
print(paste("If you need some packages permanently installed in Rstudio,"))
|
|
print(paste("please contact your VRE manager."))
|
|
print(paste("R packages may also be installed directly by using the R console."))
|
|
print(paste("Those packages can be made permanent installing them into your home directory."))
|
|
print(paste("Please keep in mind that those packages are only compatible"))
|
|
print(paste("with the R version they are build against."))
|
|
print(paste(""))
|
|
print(paste("***********************************************"))
|
|
|
|
########### Default mirror site #############################
|
|
options(repos = c(CRAN = 'https://packagemanager.rstudio.com/cran/__linux__/jammy/latest'), download.file.method = 'libcurl')
|
|
# https://docs.rstudio.com/rspm/admin/serving-binaries/#binaries-r-configuration-linux
|
|
options(HTTPUserAgent = sprintf("R/%s R (%s)", getRversion(), paste(getRversion(), R.version["platform"], R.version["arch"], R.version["os"])))
|
|
Sys.setlocale(category = "LC_ALL", locale = "en_US.UTF-8")
|
|
print(paste(""))
|
|
# initStoragehubManager <- function(){
|
|
# require(d4storagehub4R)
|
|
# storagehub <- d4storagehub4R::StoragehubManager$new(
|
|
# token_type = "jwt", token = Sys.getenv("D4SCIENCE_TOKEN")
|
|
# )
|
|
# return(storagehub)
|
|
# }
|
|
print(paste("Using Locale Encoding:",Sys.setlocale("LC_CTYPE","en_US.UTF-8")));
|
|
print(paste(""))
|