根据函数R中的点点点获取变量参数的名称（deparse）

Question

我正在创建一个基于一些虚拟变量的自动绘图仪。我把它设置为：

plotter <- function(...) { }

将绘制我喂它的所有假人。

但是，我希望它能够为图表添加标签，即变量名称。 我知道

deparse(substitute(variablename))

将产生

"variablename"

这是一个开始，但在多个参数的情况下我该怎么做？有可能吗？有解决方法吗？

Answer 1

names(list(...))将为您提供一个字符向量，其中包含...吸收的所提供参数的名称：

plotter <- function(...) {names(list(...))}
plotter(x=1:4, y=11:14)
# [1] "x" "y"

---

或者，如果你想传入未命名的参数，试试这个（扩展@baptiste现在删除的答案）：

plotter <- function(..., pch=16, col="red") {
    nms <- setdiff(as.character(match.call(expand.dots=TRUE)), 
                   as.character(match.call(expand.dots=FALSE)))
    nms
}

x <- 1:4
y <- 1:14
plotter(x, y, col="green")
# [1] "x" "y"