r - 提取带点传递的数据框的名称

Question

像这样的函数，可以使用deparse(substitute())组合来提取函数内部的参数名称

names_from_dots <- function(...) {
    deparse(substitute(...))
 }

data(iris)
data(swiss)

names_from_dots(iris)
#[1] "iris"
names_from_dots(swiss)
#[1] "swiss"

提取通过 ...(点)参数传递的data.frame的名称。

但是如何提取每个传递的多个数据的名称。

names_from_dots(swiss, iris)
[1] "swiss"
names_from_dots(iris, swiss)
[1] "iris"

当这仅返回第一个对象的名称时。

Answer 1

您可以尝试以下操作:

names_from_dots <- function(...) sapply(substitute(list(...))[-1], deparse)

names_from_dots(swiss, iris)
# [1] "swiss" "iris"