将向量列表与所需的字符串匹配进行比较-如果不匹配，则删除DF行R

Question

I'm interested in creating a vector containing keywords that are the correct titles for what is contained in the category column of a separate data frame. I'd like to be able to create a function to compare down the category column for matches against the keyword vector, and if they're not there, deleting the incorrect row from the data frame.

Here is an example of desired keywords:

"Current SharePrice","Current NAV", "Current Premium/Discount", "52WkAvg SharePrice", "52WkAvg NAV", "52WkHigh Premium/Discount" etc etc.

I'm trying to remove a few edge cases from a large table where the cleaning produced results such as:

"52WkLow NAV 52wLow"

This occurs due to missing data. Additionally, as a redundancy check, printing or storing which full rows were removed in the cleaning would be hugely helpful.

Answer 1

Using dplyr :

filter(df, category %in% keywords)

(and the lines removed:)

filter(df, !(category %in% keywords))

Base:

df[df$category %in% keywords,]

removed lines:

df[!(df$category %in% keywords),]