比较两个匹配名称的字符向量

Question

我有两个具有不同名称和值集的字符向量：

x <- c("a", "b", "c", "d", "e")
names(x) <- c("foo", "bar", "baz", "qux", "grault")

y <- c("c", "a", "d", "b")
names(y) <- c("bar", "foo", "qux", "corge")

有没有办法比较x和y以便我们知道它们对应于名称bar的值是不同的，因为这里x.bar = "b"和y.bar = "c" ？ 请注意，这些名字并未订购。 我尝试了setdiff和which(x != y)但是没有人给我正确的答案。 谢谢！

Answer 1

你可以这样做：

x[intersect(names(x), names(y))] == y[intersect(names(x), names(y))]