Jak sprawdzić, czy jakiekolwiek argumenty zostały przekazane za pomocą "..." (ellipsis) w R? Czy brakuje (...) ważnego?

Question

Chciałbym sprawdzić, czy parametr "..." (ellipsis) funkcji R został wprowadzony z niektórymi wartościami/argumentami.

Obecnie używam coś takiego:

test1 <- function(...) { 
    if (missing(...)) TRUE 
    else FALSE 
} 

test1() 
## [1] TRUE 
test1(something) 
## [2] FALSE 

to działa, ale ?missing nie wskazuje, czy ten sposób jest właściwe/ważny.

Jeśli powyższe informacje nie są poprawne, jaki jest w tym sposób? A może są inne, szybsze sposoby? PS. Potrzebuję tego rodzaju weryfikacji dla numeru this.

Answer 1

Oto alternatywa, która spowoduje błąd, jeśli spróbujesz przekazać nieistniejący obiekt.

test2 <- function(...) if(length(list(...))) FALSE else TRUE 

test2() 
#[1] TRUE 
test2(something) 
#Error in test2(something) : object 'something' not found 
test2(1) 
#[1] FALSE 

Answer 2

myślę match.call jest to, czego potrzebujesz:

test <- function(...) {match.call(expand.dots = FALSE)} 

> test() 
test() 

> test(x=3,y=2,z=5) 
test(... = list(x = 3, y = 2, z = 5)) 

To daje za każdym razem wartości przekazywane w elipsy, czy to będzie puste, jeśli nie przejdzie każdy.

Nadzieję, że pomaga!