如何在 switch 语句中将向量作为参数传递

我对问题的谷歌搜索没有返回有用的结果和文档?switch没有告诉我如何做，所以我希望我能在这里得到答案。

假设我有一个向量：

cases<- c("one","two","three")

我想使用 switch 语句并将这些元素作为 switch 语句的参数：

switch(input,cases)

上面只会输出任何内容input=1在这种情况下它将输出：

switch(1,cases)
# [1] "one" "two" "three"

任何其他参数都不会返回任何内容。我可以获得所需行为的唯一方法是在 switch 语句中显式键入 case，如下所示：

switch(2,"one","two","three")
# [1] "two"

我想要的行为是可以在 switch() 中传递列表/向量/任何内容作为参数并实现以下行为：

switch(2,cases)
# [1] "two"

The switch函数采用一个表达式，指示从函数的剩余参数中选择哪个参数号。正如您所注意到的，这意味着您需要在调用时将向量分成单独的参数switch。您可以通过将矢量转换为列表来实现这一点as.list然后将每个列表元素作为单独的参数传递给switch with do.call:

do.call(switch, c(1, as.list(cases)))
# [1] "one"
do.call(switch, c(2, as.list(cases)))
# [1] "two"
do.call(switch, c(3, as.list(cases)))
# [1] "three"

我真的没有看到这样做比使用简单的向量索引有什么好处：

cases[1]
# [1] "one"
cases[2]
# [1] "two"
cases[3]
# [1] "three"