script para ejecutar el script.R en el server remoto

37a069f3 · Pepe Márquez Romero · e778774d · 37a069f3 · 37a069f3
Commit 37a069f3 authored Apr 20, 2023 by Pepe Márquez Romero
Hide whitespace changes
Inline Side-by-side

Showing with 12 additions and 0 deletions

remote_execute_as_admin.R remote_execute_as_admin.R +11 -0

script.R script.R +1 -0

No files found.
--- a/remote_execute_as_admin.R
+++ b/remote_execute_as_admin.R
+# load opal library
+library(opalr)
+
+o <- opal.login('pepe','7G9b!!2IyJs$', url = 'https://uncover.itg.be')
+
+
+dir_name <- readline("Introduce the name of the directory please: ")
+
+setwd(dir_name)
+
+rval <- opal.execute.source(o, paste(dir_name , "script.R" , sep = "/"))
--- a/script.R
+++ b/script.R
+packageVersion("dsDates")