Visual Studio: Сделайте значение по умолчанию кода представления

Например,

word <- 'apple-orange-strawberry'

strsplit(word, "-")[[1]][1]
[1] "apple"

или, что эквивалентно

unlist(strsplit(word, "-"))[1].

По сути, идея состоит в том, что split дает список в результате, к элементам которого нужно обращаться либо (в последнем случае) или путем исключения (последний).

Если вы хотите применить метод ко всему столбцу:

first.word <- function(my.string){
    unlist(strsplit(my.string, "-"))[1]
}

words <- c('apple-orange-strawberry', 'orange-juice')

R: sapply(words, first.word)
apple-orange-strawberry            orange-juice 
                "apple"                "orange"