Alcance y funciones en R 2.11.1: ¿Qué está mal?

Question

Esta pregunta proviene de una serie de otras preguntas que tratan esencialmente el mismo problema. Por alguna extraña razón, el uso de una función dentro de otra función a veces falla en el sentido de que las variables definidas dentro del entorno local de la primera función no se encuentran en la segunda función.

El patrón clásico en pseudo-código:

ff <- function(x){ 
    y <- some_value 
    some_function(y) 
} 
ff(x) 

Error en eval (expr, Envir, enclos): de objeto 'y' No se han encontrado

principio pensé que tenía algo que ver con los métodos S4 y el alcance allí, pero también sucede con otras funciones. He tenido alguna interacción con el equipo de desarrollo de R, pero lo único que hicieron fue dirigirme al sitio de informes de errores (que no es el más atractivo, tengo que decir). Nunca recibí ningún comentario.

Como el problema sigue surgiendo, me pregunto si hay una explicación lógica para ello. ¿Es un error común en todos estos casos, y si es así, cuál? ¿O es realmente un error?

Algunas de estas preguntas:

• Using functions and environments
• R (statistical) scoping error using transformBy(), part of the doBy package.
• How to use acast (reshape2) within a function in R?
• Why can't I pass a dataset to a function?
• Values not being copied to the next local environment

PD: Sé que el Lista R-devel, en caso de que te lo hayas preguntado ...

Answer 1

Como mencionó Dirk en su respuesta, en realidad no hay un problema con el código que ha publicado. En los enlaces que publicó en la pregunta, parece haber un tema en común: some_function contiene un código que daña los entornos de alguna manera.Esta es Messing ya sea explícita, usando new.env y with o implícitamente, utilizando un argumento data, que probablemente tiene una línea como

y <- eval(substitute(y), data) 

La moraleja de la historia es doble. En primer lugar, trate de evitar manipular entornos explícitamente, a menos que esté realmente seguro de que sabe lo que está haciendo. Y, en segundo lugar, si una función tiene un argumento de datos, entonces coloque todas las variables que necesita la función para usar dentro de ese marco de datos.

Answer 2

Sin duda hay errores en R, pero muchos de los problemas que las personas han tenido son errores con frecuencia en la implementación de some_function, no en sí. R tiene reglas de alcance (ver http://cran.r-project.org/doc/manuals/R-intro.html#Scope) que cuando se combinan con la evaluación perezosa de argumentos de funciones y la capacidad de argumentos eval en otros ámbitos son extremadamente potentes, pero que a menudo también conducen a errores sutiles.

Answer 3

Bueno hay ningún problema en lo que usted envió:

/tmp$ cat joris.r 
#!/usr/bin/r -t 

some_function <- function(y) y^2 

ff <- function(x){ 
    y <- 4 
    some_function(y) # so we expect 16 
} 
print(ff(3))   # 3 is ignored 
$ ./joris.r 
[1] 16 
/tmp$ 

Podría repetir y fallo real o Postan misfeature?

Answer 4

R tiene alcance léxico y dinámico. El alcance léxico funciona automáticamente, pero el alcance dinámico debe implementarse manualmente y requiere una cuidadosa contabilidad. Solo las funciones utilizadas de forma interactiva para el análisis de datos necesitan un alcance dinámico, por lo que la mayoría de los autores (¡como yo!) No aprenden a hacerlo correctamente.

Vea también: standard non-standard evaluation rules.