向R中的调用对象添加元素

Question

我想知道如何将& weeks == 1添加到下面的s的末尾？

s <- substitute(type == 1 & ESL == 1 & prof == T) # A `call` object

# Tried the following to add "& weeks == 1" to end of `s` without success:

 c(s, "& weeks == 1")

希望输出一个呼叫对象，如下所示：

type == 1 & ESL == 1 & prof == T & weeks == 1

Answer 1

无需使用bquote仅在语言级别转换为文本即可完成此操作]

bquote(.(s) & weeks == 1)
## type == 1 & ESL == 1 & prof == T & weeks == 1