Computing en la Lengua en I

Question

Si Quiero imprimir el símbolo que denota un objeto en RI puede utilizar comillas():

> X <- list() 
> print(quote(X)) 
X 
> 

Sin embargo, si tengo la función

h <- function(Y){ 
    quote(Y) 
} 

continuación

> h(X) 
Y 
> 

¿es posible en I escribir una función tal que

> h(X) 
X 

?

Answer 1

> f = function(x) print(deparse(substitute(x))) 
> f(asd) 
[1] "asd" 
> 

¿Por qué? Como ha descubierto, quote() le dice a R que no evalúe un bloque de código (que lo hace con Y). substitute() se comporta de manera diferente; hay un buen ejemplo en ?substitute.

Answer 2

h <- function(x) match.call()[['x']] 

h(X) 
X 

Answer 3

substitute funciona también sin las llamadas adicionales:

h <- function(x) substitute(x) 
h(X) 
X