Использование базы R:
items <- c('Fruit', 'Vegetables (Few)', 'Bread Crumbs', 'Cheese (Cheddar)', 'Yogurt (Plain%)')
items_simplified <- trimws(gsub('\\(.*', '', items))
> items_simplified
[1] "Fruit" "Vegetables" "Bread Crumbs" "Cheese" "Yogurt"
Вы также можете использовать stringr
из пакета tidyverse
:
library(stringr)
items_stringr <- str_trim(str_extract(items, '[^(]*'))
> items_stringr
[1] "Fruit" "Vegetables" "Bread Crumbs" "Cheese" "Yogurt"
trimws
и str_trim
убирают конечные и начальные пробелы из элементов.