Filtering tibble for elements from the separate list in R

I hava a tibble when I filter the first column for particular value and write the output to the file. However, now I am having a big list with a lots of values (around 4000) and want to print out the lines from our_lines tibble when the element of the list is in the first column of the tibble. Please help me with R code to do this for me.

I would like to extend the below code for more values that are in separate list:
inCommon <- filter(our_lines, our_lines[ ,1] == “BMP1” | our_lines[ ,1] == “BMP2” | our_lines[ ,1] == “BMP4”

write.csv(inCommon, file = “my_data.csv”)