establecer variables de entorno mediante programación

Question

en I, puedo establecer variables de entorno "manualmente", por ejemplo:

Sys.setenv(TODAY = "Friday") 

Pero ¿y si el nombre de la variable y el valor medio se almacenan en objetos R?

var.name <- "TODAY" 
var.value <- "Friday" 

me escribió esto:

expr <- paste("Sys.setenv(", var.name, " = '", var.value, "')", sep = "") 
expr 
# [1] "Sys.setenv(TODAY = 'Friday')" 
eval(parse(text = expr)) 

el que hace el trabajo:

Sys.getenv("TODAY") 
# 1] "Friday" 

pero me parece muy feo. ¿Hay una mejor manera? Gracias.

Answer 1

Puede utilizar do.call llamar a la función con ese argumento con nombre:

args = list(var.value) 
names(args) = var.name 
do.call(Sys.setenv, args) 

Answer 2

Prueba esto:

.Internal(Sys.setenv(var.name, var.value))