我可以使用关系或条件作为函数中的变量吗?
Can I use a relation or a condition as a variable in a function?
例如让我们成为一个向量ttt <- c(1,5,7,2,6)
,假设我们想要一个ttt
的元素大于2的向量。那么我们必须写ttt[ttt>2]
.
我们可以有一个函数 TF_sequense(,)
, 通过写 TF_sequense(ttt,>2)
来完成这件事吗?
我尝试了 do.call()
问题中的 do.call()
功能,但找不到解决方案。
提前致谢!
我们可以使用
TF_sequence <- function(vec, expr) {
obj1 <- deparse(substitute(vec))
eval(parse(text = sprintf("%s[%s%s]", obj1, obj1, expr)))
}
TF_sequence(ttt, ">2")
例如让我们成为一个向量ttt <- c(1,5,7,2,6)
,假设我们想要一个ttt
的元素大于2的向量。那么我们必须写ttt[ttt>2]
.
我们可以有一个函数 TF_sequense(,)
, 通过写 TF_sequense(ttt,>2)
来完成这件事吗?
我尝试了 do.call()
问题中的 do.call()
功能,但找不到解决方案。
提前致谢!
我们可以使用
TF_sequence <- function(vec, expr) {
obj1 <- deparse(substitute(vec))
eval(parse(text = sprintf("%s[%s%s]", obj1, obj1, expr)))
}
TF_sequence(ttt, ">2")