获取传递给r中函数的vector的名称

Question

我认为这最好用例子来说明。我有一个函数，它做一些事情，然后返回一个列表。我希望能够使用传递给函数的变量的名称作为要返回的列表中的元素的名称。例如，我的函数是

myFun <- function(x) {  
... do something here to generate some value  
list(original name of x =  some value)   
}  
CL <- c(1,2,3,4,5)  
z <- myFun(CL)

我将CL传递给函数。然后我希望函数返回以下内容:

z
$CL
[1] some value

如何从传递中获得变量名CL ?

Answer 1

这里有一个例子，取一个值(x)并加上2，返回一个列表，其中包含传递给函数(myFUN)的对象的名称。

myFUN <- function(x){

y <- x + 2

output <- list(y)

names(output) <- deparse(substitute(x))

return(output)
}
CL <- 3
myFUN(CL)
$CL
[1] 5