Calculating average value by grouping by multiple variables using Group_by function in R studio

I have a table set up like this

Selecting a group of rows if one of them has a desired attribute

I have a data frame like this: