Variables globales en paquetes en R

Question

Estoy desarrollando un paquete en R. Tengo un montón de funciones, algunas de ellas necesitan algunas variables globales. ¿Cómo administro variables globales en paquetes?

He leído algo sobre el medio ambiente, pero no entiendo cómo funcionará, si esta es la manera de hacerlo.

Answer 1

En general, las variables globales son evil. El principio subyacente de por qué son malvados es que quieres minimizar las interconexiones en tu paquete. Estas interconexiones a menudo hacen que las funciones tengan efectos secundarios, es decir, depende no solo de los argumentos de entrada cuál es el resultado, sino también del valor de alguna variable global. Especialmente cuando la cantidad de funciones crece, esto puede ser difícil de resolver y mucho menos depurar.

Para las variables globales en R, vea este SO post.

Editar en respuesta a tu comentario: Una alternativa podría ser simplemente pasar la información necesaria a las funciones que lo necesitan. Se puede crear un nuevo objeto que contiene esta información:

token_information = list(token1 = "087091287129387", 
         token2 = "UA2329723") 

y requieren todas las funciones que necesitan esta información para tenerlo como un argumento:

do_stuff = function(arg1, arg2, token) 
do_stuff(arg1, arg2, token = token_information) 

De esta manera queda claro a partir del código que se necesita información de token en la función, y puede depurar la función por sí mismo. Además, la función no tiene efectos secundarios, ya que su comportamiento está completamente determinado por sus argumentos de entrada. Un script de usuario típico sería algo así como:

token_info = create_token(token1, token2) 
do_stuff(arg1, arg2, token_info) 

Espero que esto aclare las cosas.

Answer 2

También podemos establecer un option, por ejemplo

options("mypkg-myval"=3) 
1+getOption("mypkg-myval") 
[1] 4 

Answer 3

La pregunta es clara:

• Sólo un proceso de I o de varios?

• ¿Solo en un host o en varias máquinas?

• ¿Hay acceso de archivos común entre ellos o no?

En orden creciente de complejidad, que haría uso de un archivo, un backend SQLite a través del paquete de RSQlite o (mi favorito :) el paquete rredis para establecer/leyendo de una instancia Redis.

Answer 4

Puede usar variables locales del paquete a través de un entorno. Estas variables estarán disponibles para múltiples funciones en el paquete, pero no (fácilmente) accesibles para el usuario y no interferirán con el espacio de trabajo de los usuarios. Un ejemplo rápido y sencillo es:

pkg.env <- new.env() 

pkg.env$cur.val <- 0 
pkg.env$times.changed <- 0 

inc <- function(by=1) { 
    pkg.env$times.changed <- pkg.env$times.changed + 1 
    pkg.env$cur.val <- pkg.env$cur.val + by 
    pkg.env$cur.val 
} 

dec <- function(by=1) { 
    pkg.env$times.changed <- pkg.env$times.changed + 1 
    pkg.env$cur.val <- pkg.env$cur.val - by 
    pkg.env$cur.val 
} 

cur <- function(){ 
    cat('the current value is', pkg.env$cur.val, 'and it has been changed', 
     pkg.env$times.changed, 'times\n') 
} 

inc() 
inc() 
inc(5) 
dec() 
dec(2) 
inc() 
cur()