0
I have a file with a column and I would like to transfer it with one condition: the first number that appears and the subsequent lines should be in a row
df <- data.frame(Coluna = c(1, "ALDO SANTOS", "02/02/2020", "MARIA SANTOS", "EM Socorro Bastos", "Pov. Acará Mirim",
"EM Socorro Bastos","Pov. Acará Mirim",2,"FABIA SOUSA", "12/10/2020","RAIMUNDA SOUSA",
"EM Caio Abreu", "Pov. Bacuri", "EM Gonçalves Dias", "Pov. Morada N. Areias", 3,
"FABINA NUNES", "28/01/2020", "LUCIA GOMES", "Colégio Albérico F. Ferreira",
"Trindade - Sede"),
stringsAsFactors = FALSE)
df
Coluna
1 1
2 ALDO SANTOS
3 02/02/2020
4 MARIA SANTOS
5 EM Socorro Bastos
6 Pov. Acará Mirim
7 EM Socorro Bastos
8 Pov. Acará Mirim
9 2
10 FABIA SOUSA
11 12/10/2020
12 RAIMUNDA SOUSA
13 EM Caio Abreu
14 Pov. Bacuri
15 EM Gonçalves Dias
16 Pov. Morada N. Areias
17 3
18 FABINA NUNES
19 28/01/2020
20 LUCIA GOMES
21 Colégio Albérico F. Ferreira
22 Trindade - Sede
I expect a result like this:
Coluna_1 Coluna_2 Coluna_3 Coluna_4 Coluna_5 Coluna_6 Coluna_7 Coluna_8
1 ALDO SANTOS 02/02/20 MARIA SANTOS EM Socorro Bastos Pov. Acará Mirim EM Socorro Bastos Pov. Acará Mirim
2 FABIA SOUSA 02/08/20 RAIMUNDA SOUSA EM Caio Abreu Pov. Bacuri EM Gonçalves Dias Pov. Morada N. Areias
3 FABINA NUNES 28/01/20 LUCIA GOMES Colégio Albérico F. Ferreira Trindade - Sede