удалить строки, не начинающиеся с определенной строки

Question

У меня есть такой набор данных: первый столбец частично совпадает со вторым столбцом

dats<-data.frame(ID=c(1:3),row1=c("do","cat","me"),
                 row2=c("dog","dogcat","exomec"))

Я хочу сохранить только те строки, которые соответствуют , начинается с начала (т.е. только первый ряд) и удалите те совпадения, которые начинаются в середине или в конце.

мой набор данных цели:

  ID row1   row2
1  1   do    dog

Спасибо !!!

Answer 1

Мы можем использовать filter с str_detect, который векторизован по строке и шаблону.

library(dplyr)
library(stringr)

dats %>% filter(str_detect(row2, paste0('^', row1)))

#  ID row1 row2
#1  1   do  dog