Распакуйте все между каждой строкой "Atribuição:"

Question

Вот мой текст:

teste <- "2ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – CRIMINAL (RECLUSÃO)\r\nAtribuição: Criminal – 8ª Vara Criminal (juiz 2)\r\nNovo Fórum: 
sala 203-B – fone: 3018-0835\r\n2promotoria@mpgo.mp.br  Vanusa de Araújo Lopes 
Andrade                       Resolução\r\n              
                                                               07/2016\r\n3ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – CRIMINAL (RECLUSÃO)\r\nAtribuição: Criminal – 
10ª Vara Criminal (juiz 2)\r\nNovo Fórum: sala 423 A - Telefones: 3018-0808 / 
0809 / 0810 / 0811\r\n3promotoria@mpgo.mp.br Mozart Brum Silva (Mozart Brum Silva 
atua em Resolução\r\n                       substituição na 64ª PJ de Goiânia) 
                   07/2016\r\n4ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – INFÂNCIA E JUVENTUDE\r\nAtribuição: Infância e Juventude – Ato Infracional\r\nJuizado da 
Infância e Juventude: (62) 3285-5429/5439; 2º Juizado Cível: (62) 3251-
\r\n6953;\r\n4promotoria@mpgo.mp.br Frederico Augusto de Oliveira Santos 
(Frederico Resolução\r\n                       Augusto de Oliveira Santos atua em 
substituição 08/2016\r\n                       na 52ª Promotoria de Justiça de 
Goiânia)\r\n5ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – FAZENDA 
PÚBLICA\r\nESTADUAL\r\nAtribuição: Cível – 2ª, 3ª Varas da Fazenda Pública 
Estadual (Juiz 1 e 2) e 1º\r\nJuizado Especial da Fazenda Pública.\r\nEdifício-
Sede: sala 157 – ramal: 8232\r\n5promotoria@mpgo.mp.br Eduardo Abdon Moura 
(Eduardo Abdon Moura Resolução\r\n                       atua perante as 3ª, 5ª e 
6ª Varas da Fazenda Pública 12/2018\r\n                       Estadual e no 1º 
Juizado Especial das Fazendas,\r\n                       exclusivamente quanto
 aos feitos relacionados à\r\n                       Fazenda     Pública  
    Estadual,   sem    prejuízo,\r\n                       provisoriamente, até 
ulterior deliberação do egrégio\r\n                       Colégio de Procuradores 
de Justiça – portaria n.\r\n                       2563/18).\r\n6ª PROMOTORIA DE 
JUSTIÇA DE GOIÂNIA – FAMÍLIA\r\nAtribuição: Cível – 6ª Vara de 
Família\r\nEdifício-Sede: sala 142-B – ramal: 8214/8468\r\n6promotoria@mpgo.mp.br
 Vaga (Maria Cecilia de Jesus Ferreira responde        Resolução\r\n   
                    pela 6ª PJ de Goiânia, sem prejuízo – portaria n.
     06/2016\r\n                       519/19)\r\n7ª PROMOTORIA DE JUSTIÇA DE 
GOIÂNIA – MEIO AMBIENTE E\r\nURBANISMO\r\nAtribuição: Meio Ambiente e 
Urbanismo\r\nEdifício-Sede: sala 147 – ramal: 8460/8585\r\n7promotoria@mpgo.mp.br 
Alice de Almeida Freire                               Resolução\r\n                                                                            015/2013\r\n"

Это мой желаемый результат ( выделено ):

2ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA - УГОЛОВНОЕ ПРЕСТУПЛЕНИЕ (ЗАЯВЛЕНИЕ) \ r \ nAtribuição: Criminal – 8ª Vara Criminal (juiz 2)\r\nNovo Fórum: sala 203-B – fone: 3018-0835\r\n2promotoria@mpgo.mp.br Vanusa de Araújo Lopes Andrade Resolução\r\n 07/2016\r\n3ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – CRIMINAL (RECLUSÃO)\r\n Атрибуция: Criminal – 10ª Vara Criminal (juiz 2)\r\nNovo Fórum: sala 423 A - Telefones: 3018-0808 / 0809 / 0810 / 0811\r\n3promotoria@mpgo.mp.br Mozart Brum Silva (Mozart Brum Silva atua em Resolução\r\n substituição na 64ª PJ de Goiânia) 07/2016\r\n4ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – INFÂNCIA E JUVENTUDE\r\n Атрибуция: Infância e Juventude – Ato Infracional\r\nJuizado da Infância e Juventude: (62) 3285-5429/5439; 2º Juizado Cível: (62) 3251-\r\n6953;\r\n4promotoria@mpgo.mp.br Frederico Augusto de Oliveira Santos (Frederico Resolução\r\n Augusto de Oliveira Santos atua em substituição 08/2016\r\n na 52ª Promotoria de Justiça de Goiânia)\r\n5ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – FAZENDA PÚBLICA\r\nESTADUAL\r\n Атрибуция: Cível – 2ª, 3ª Varas da Fazenda Pública Estadual (Juiz 1 e 2) e 1º\r\nJuizado Especial da Fazenda Pública.\r\nEdifício-Sede: sala 157 – ramal: 8232\r\n5promotoria@mpgo.mp.br Eduardo Abdon Moura (Eduardo Abdon Moura Resolução\r\n atua perante as 3ª, 5ª e 6ª Varas da Fazenda Pública 12/2018\r\n Estadual e no 1º Juizado Especial das Fazendas,\r\n exclusivamente quanto aos feitos relacionados à\r\n Fazenda Pública Estadual, sem prejuízo,\r\n provisoriamente, até ulterior deliberação do egrégio\r\n Colégio de Procuradores de Justiça – portaria n.\r\n 2563/18).\r\n6ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – FAMÍLIA\r\n Атрибутика:

1014 Cível – 6ª Vara de Família\r\nEdifício-Sede: sala 142-B – ramal: 8214/8468\r\n6promotoria@mpgo.mp.br Vaga (Maria Cecilia de Jesus Ferreira responde Resolução\r\n pela 6ª PJ de Goiânia, sem prejuízo – portaria n. 06/2016\r\n 519/19)\r\n7ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA – MEIO AMBIENTE E\r\nURBANISMO\r\n 1012 *1012* 1012 *1012* 1012 *1012* 1012

РЕДАКТИРОВАНИЕ: Я нашел решение и разместил здесь

Answer 1

Я получил решение для своей проблемы:
str_extract_all(teste, regex("(?<=(Atribuição: ))(.*?)(?=(Atribuição: |^))", dotall = T))

[[1]]
[1] "Преступник - 8ª Преступник Вара (juiz 2)" Новый Форм: sala 203-B - номер телефона: 3018-0835 \ r \ n2promotoria@mpgo.mp.br Вануса де Араужо Лопес Андраде Резолюшн \ r \ n 07 / 2016 \ r \ n3ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA - УГОЛОВНОЕ ДЕЛО (RECLUSÃO) \ r \ n "
[2] «Преступник - 10ª Вара Преступник (juiz 2)» Новый телефон: sala 423 A - Телефоны: 3018-0808 / 0809/0810/0811 \ r \ n3promotoria@mpgo.mp.br Моцарт Брум Силва (Моцарт Брам Silva atua em Resolução \ r \ n replaceição na 64ª PJ de Goiânia) 07/2016 \ r \ n4ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA - ИНФАНСИЯ E JUVENTUDE \ r \ n "
[3] "Infância e Juventude - Ato Infracional \ Jujado da Infância e Juventude: (62) 3285-5429 / 5439; 2º Juizado Cível: (62) 3251- \ r \ n6953; \ r \ n4promotoria@mpgo.mp .br Фредерико Аугусто де Оливейра Сантос (Фредерико Аугусто де Оливейра Сантос Атуа заменитель 08/2016 \ r \ n na 52ª Промо-де-де-Жюстия-де-Гояния) \ PROMOTORIA DE JUSTIÇA DE GOIÂNIA - ФЛЕНДА \ nESTADUAL \ г \ п "
[4] "Cível - 2ª, 3ª Váras da Fazenda Pública Estadual (Juiz 1 e 2) e 1º \ r \ nJuizado Особенный да Fazenda Pública. \ R \ nEdifício-Sede: sala 157 - ramal: 8232 \ r \ n5promotoria @ mpgo .mp.br Эдуардо Абдон Моура (Eduardo Abdon Moura Resolução \ r \ n atua perante as 3ª, 5ªe 6ª Varas da Fazenda Pública 12/2018 \ r \ n Estadual e no 1º Juizado Особенный das Fazendas, \ r \ n exclusivate quen aos feitos relacionados á \ r \ n Fazenda Pública Estadual, sem prejuízo, Provisoriamente at at ultern deliberação do egrégio \ r \ n Colégio de Procuradores de Justiça - Portaria n. \ r \ n \ r63 / 18). \ n6ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA - FAMÍLIA \ r \ n " [5] "Cível - 6ª Вара-де-Фамилия". Edifício-Sede: sala 142-B - ramal: 8214/8468 \ r \ n6promotoria@mpgo.mp.br Вага (Мария Сесилия де Хесус Феррейра отвечает Resolução \ r \ n pela 6ª PJ de Goiânia, sem prejuízo - portaria n. 06/2016 \ r \ n 519/19) \ r \ n7ª PROMOTORIA DE JUSTIÇA DE GOIÂNIA - MEIO AMBIENTE E \ ​​r \ nURBANISMO \ r \ n "

Так что теперь я получаю все между словами Atribuição:, но исключая границы.

Answer 2

Я не специалист по регулярным выражениям, поэтому, вероятно, вы можете выполнить это не так-то просто, но с этим вы получите желаемый результат

x <- unlist(strsplit(teste, split = "\\r\\n"))
x <- x[grepl("^Atribuição:" , x) | grepl("^Juizado Especial" , x)]
x <- gsub("\\n", "", x)
x[4] <- paste(x[4], x[5])[-5] # included
x <- gsub(".*: ", "", x)
x
[1] "Criminal – 8ª Vara Criminal (juiz 2)"                                                                   
[2] "Criminal – 10ª Vara Criminal (juiz 2)"                                                                  
[3] "Infância e Juventude – Ato Infracional"                                                                 
[4] "Cível – 2ª, 3ª Varas da Fazenda Pública Estadual (Juiz 1 e 2) e 1º Juizado Especial da Fazenda Pública."
[5] "Juizado Especial da Fazenda Pública."                                                                   
[6] "Cível – 6ª Vara de Família"                                                                             
[7] "Meio Ambiente e Urbanismo"   

EDIT Это даже сложнее, чем оригинальное и не законченное решение