Computing od języka R

Question

Jeśli chcę wydrukować symbol oznaczający przedmiot w RI można używać cytatów():

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

Jednak jeśli mam funkcja

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

następnie

> h(X) 
Y 
> 

Czy to możliwe, w R napisać funkcję tak, że

> h(X) 
X 

?

Answer 1

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

Dlaczego? Jak się dowiedziałeś, quote() mówi R, aby nie oceniał bloku kodu (co robi z Y). substitute() zachowuje się inaczej; jest dobry przykład pod adresem ?substitute.

Answer 2

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

h(X) 
X 

Answer 3

substitute działa również bez dodatkowych połączeń:

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