r - 作为函数参数提供时获取列表变量的名称

Question

假设我有一个函数接受始终是列表一部分的变量。

myfun <- function(x$name,y$name) { 
 # stuff 
} 

我想做的是使用名称。

alist <- list(Hello=1,Goodbye=2)

myfun(alist$Hello, alist$Goodbye) { 
 # I want to be able to work with the characters "Hello" and "Goodby" in here
}

因此，在我的函数中，我将如何获得字符“Hello”和“Goodbye”。给定alist$Hello和alist$Goodbye

Answer 1

我记得这样plot.default做是deparse(substitute(：

a <- list(a="hello",b=c(1,2,3))
f <- function(x,y) { print(deparse(substitute(x))); print(deparse(substitute(y))) }
f(a$a,a$b)
#[1] "a$a"
#[1] "a$b"

Answer 2

像这样的东西，也许：

myfun <- function(x) { print(substitute(x))}
myfun(iris$Sepal.Length)
## iris$Sepal.Length

Answer 3

我将使用列表参数创建函数：

myfun <- function(l) {
    print(names(alist))
}
myfun(alist)
# [1] "Hello"   "Goodbye"