获取向量匹配提供名称的索引

Question

字符提取是否有which类似物？

说x <- c("low" = -10, "high" = 10)。 x[c("high", "low")]返回c(10, -10)非常棒;对于我想要做的事情，我想要相应的匹配索引，即c(2L, 1L)。

这似乎非常基本，但which没有矢量化，?extract没有提供任何帮助。

似乎应该是矫枉过正的解决方案是：

> sapply(c("high", "low"), function(y) which(names(x) == y))
high  low 
   2    1 

有没有更简单的方法来做到这一点？