summarize()中有没有一个R函数可以计算两个变量重合的数量？

# 创建两个向量
vec1 <- c(1, 2, 3, 4, 5)
vec2 <- c(3, 4, 5, 6, 7)

# 使用intersect()函数计算重合的数量
intersection <- intersect(vec1, vec2)
count <- length(intersection)

# 打印结果
print(count)