Вычислительный на языке в R

Question

Если я хочу напечатать символ, обозначающий объект в R, я могу использовать quote ():

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

Однако, если у меня есть функция

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

тогда

> h(X)
Y
>

Возможно ли в R написать такую ​​функцию, что

> h(X)
X

Answer 1

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

Почему? Как вы узнали, quote() говорит R не оценивать блок кода (что он делает с Y). substitute() ведет себя по-разному; хороший пример на ?substitute.

Answer 2

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

h(X)
X

Answer 3

substitute также работает без дополнительных звонков:

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