r - 字符串拆分的第一个条目

Question

我有一个people$food列，其中包含chocolate或apple-orange-strawberry之类的条目。

我想用people$food拆分-并从拆分中获取第一个条目。

在python中，解决方案是food.split('-')[0]，但我找不到R的等效项。

Answer 1

如果需要从每个拆分中提取第一个(或nth)条目，请使用:

word <- c('apple-orange-strawberry','chocolate')

sapply(strsplit(word,"-"), `[`, 1)
#[1] "apple"     "chocolate"

或者更快更明确:

vapply(strsplit(word,"-"), `[`, 1, FUN.VALUE=character(1))
#[1] "apple"     "chocolate"

这两位代码都可以很好地选择拆分列表中的任意一个值，并且可以处理超出范围的情况:

vapply(strsplit(word,"-"), `[`, 2, FUN.VALUE=character(1))
#[1] "orange" NA