gCubeSystem
/
rstudio-rprofile
15
0
Fork 0
Code Pull Requests Releases Activity

Disable d4storagehub4R again

This commit is contained in:
Andrea Dell'Amico 2023-04-08 12:09:56 +02:00
parent 6c7e2c46aa
commit fb53e9fee9
Signed by: andrea.dellamico
GPG Key ID: 147ABE6CEB9E20FF
1 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
jupyter-Rprofile.site
View File

@ -5,7 +5,8 @@ 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. Future Gener. Comput. Syst. 101: 555-563 10.1016/j.future.2019.05.063"))
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."))
@ -17,7 +18,8 @@ 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: storagehub = initStoragehubManager()"))
# 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(""))
@ -42,11 +44,11 @@ options(repos = c(CRAN = 'https://packagemanager.rstudio.com/cran/__linux__/foca
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)
}
# 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")));