Как начать с функции для создания символа вместо логического в R?

Question

По умолчанию функция startsWith выдает логический вывод:

x1 <- c("Foobar", "bla bla", "something", "another", "blu", "brown",
        "blau blüht der Enzian")

startsWith(x1, "b")
[1] FALSE  TRUE FALSE FALSE  TRUE  TRUE  TRUE

Как можно использовать его для получения фактических названий слов?

Answer 1

Для этого мы можем использовать grep с аргументом value, который по умолчанию равен FALSE

grep("^b", x1, value = TRUE)

Или использовать логический вектор для подмножества

x1[startsWith(x1, "b")]

Answer 2

Мы можем использовать str_subset из stringr

stringr::str_subset(x1, '^b')
#[1] "bla bla"    "blu"  "brown" "blau blüht der Enzian"