conditionally keep rows using R

Question

I need to conditionally read some of rows from a text file using R.

Logically, I need to do: if the long string content "probability" and "carrier" th