在 R - Tidyverse 解决方案中为长字符串添加换行符？

Question

我的字符串很长，想系统地添加换行符。我想在 Yrkeshögskoleutbildning 2018 之后添加换行符。无论之后发生什么。是否有一个优雅的 tidyverse 解决方案？

string <- "2120002122;Arboga Kommun ;Arboga kommun, Vuxenutbildningen;Specialistundersköterska inom demens;415723rb;1984;Arboga Kommun;Yrkeshögskoleutbildning 20182120001561;Borås Kommun;Borås Stad - Borås Yrkeshögskola;Automationsingenjör;525523fa;1490;Haglund Industri AB;Yrkeshögskoleutbildning 20181"

Answer 1

您可以使用 str_split 和积极的回顾：

library(stringr)
str_split(string, "(?<=Yrkeshögskoleutbildning 2018)")
[[1]]
[1] "2120002122;Arboga Kommun ;Arboga kommun, Vuxenutbildningen;Specialistundersköterska inom demens;415723rb;1984;Arboga Kommun;Yrkeshögskoleutbildning 2018"
[2] "2120001561;Borås Kommun;Borås Stad - Borås Yrkeshögskola;Automationsingenjör;525523fa;1490;Haglund Industri AB;Yrkeshögskoleutbildning 2018"             
[3] "1"

使用unlist得到一个向量：

unlist(str_split(string, "(?<=Yrkeshögskoleutbildning 2018)"))

在 R - Tidyverse 解决方案中为长字符串添加换行符？

Add line breaks to a long string in R - Tidyverse soultion?

string

r

stringr