R добавляет новые строки к каждому n-му вхождению пробела

Question

Mytext - это длинная строка, разделенная пробелом.

Mytextsample <- "aaaaabb cccdddd eee adssdada ooeoeo ososs ksdkd
ooeresso osososososos krrr dkdkkd odlcjs kdcmcmc ddddd dmssss"

Я пытался добавить новую строку каждые 10-й пробел, используя регулярные выражения. Как использовать функцию замены текста, такую ​​как gsub или str_replace * * 1006

Answer 1

В этом решении сначала используется strsplit() ваша строка в векторе в каждом пространстве, split() - после каждого 10-го элемента и paste0() для повторной сборки каждого уровня с использованием sapply():

Mytextsample <- "aaaaabb cccdddd eee adssdada ooeoeo ososs ksdkd
  ooeresso osososososos krrr dkdkkd odlcjs kdcmcmc ddddd dmssss"

dat <- unlist(strsplit(Mytextsample, " ")) # unlist is here to convert to a vector
dat <- split(dat, ceiling(seq_along(dat)/10))

out <- sapply(dat, function(x) paste0(x, collapse = " "))
out