Подмножество нескольких столбцов в R — более элегантный код?

Я подмножаю фрейм данных в соответствии с несколькими критериями в нескольких столбцах. Я выбираю строки в кадре данных, которые содержат одно из нескольких значений, определенных в векторных «критериях» в любом из трех разных столбцов.

У меня есть код, который работает, но интересно, какие другие (более элегантные?) способы это сделать. Вот что я сделал:

criteria <-c(1:10)
subset1 <-subset(data, data[, "Col1"] %in% criteria | data[, "Col2"]
 %in% criteria | data[, "Col3"] %in% criteria)

Предложения приветствуются. (Я новичок в R, поэтому очень простые объяснения того, что вы предлагаете, также приветствуются.)