Поиск совпадений из объекта класса «вызов» в R

Question

Учитывая вызов функции объект a, мне было интересно, как найти экземпляры n, для которых control равно T и F, также как узнать, каково значение long для каждого из таких случаев?

Например, в приведенном ниже случае я ожидаю подмножество 31 32 35 как n с, для которого управление равно T и 30 33 34 как n s для которого установлено значение F.

То же самое относится к long. Другими словами, я ищу стратегию поднабора для объекта call?

foo <- function(n , long, control, ...){

 match.call()
}

# Example:
a <- foo(n = 30:35, long = c(1, 2, 2, 3, 1,1), control = c(F, T, T, F, F, T))

Answer 1

Если нам нужно получить значение из 'a'

lst1 <- as.list(a)
eval(lst1$n)[eval(lst1$control)]
#[1] 31 32 35
eval(lst1$n)[eval(lst1$control) & eval(lst1$long)==1]
#[1] 35