I want to create a new data frame by extracting only the lines that contain elements of a vector from the data frame.

df<-data.frame(
  "name" = c(rep("Company A", 5), rep("Company B", 3)),
  "year" = c (1999:2003, 1999:2001),
  "price" = c (200, 202, 199, 400, 207, 300, 500, 201)
)

select_price<-c(199,200,201,202,207)

matched <-df [df$price%in%select_price,]

print(matched)

#
  name year price
1 Company A 1999 200
2 Company A 2000 202
3A Company 2001 199
5 Company A 2003 207
8B Company 2001 201

library(dplyr)

matched<-df%>%filter(price%in%select_price)

print(matched)

#
  name year price
1 Company A 1999 200
2 Company A 2000 202
3A Company 2001 199
4 Company A 2003 207
5B Company 2001 201