慢函数，如何从R中移除for循环。

I have a function in R that compares a smaller vector to a larger one and then finds where there are matches and uses that information to extract data from a larger data frame. I have a function in R that compares a smaller