
Estudo de Caso | 167
Podemos separar os valores em cada código com duas passagens de separate(). A
primeira passagem separará os códigos em cada underscore:
separate( key, c( "new", "type", "sexage" ), sep = "_" )
ho3
8
#> country iso2 iso3 year new type sexage cases
#> * <chr> <chr> <chr> <int> <chr> <chr> <chr> <int>
#> 1 Afghanistan AF AFG 1997 new sp m014 0
#> 2 Afghanistan AF AFG 1998 new sp m014 30
#> 3 Afghanistan AF AFG 1999 new sp m014 8
#> 4 Afghanistan AF AFG 2000 new sp m014 52
#> 5 Afghanistan AF AFG 2001 new sp m014 129
#> 6 Afghanistan AF AFG 2002 new sp m014 90
#> # ... with 7.604e+04 more ...