如何将 purrr 与 str_split 一起使用

Question

仍在努力掌握咕噜声

library(stringr)
library(purrr)

df <- data.frame(text=c("Even Flow", "My Sweet Lord"))

我怎样才能使用 map_chr 和 str_split 来获取第二个文本元素的向量，即 "Flow" "Sweet"

TIA

Answer 1

这是一个 data.table

的解决方案

library(stringr)
library(data.table)

df <- data.table(text=c("Even Flow", "My Sweet Lord"))
df[, text_second := tstrsplit(text, " ")[2]]

并使用 purrr

library(purrr)
df$text %>% map(str_split, pattern = " ") %>% map_chr(c(1,2))

How can I use purrr with str_split