Importação tidy

Olá, pessoal. Tudo bem?

Estou com uma planilha (anexo) que a importação dela não é tão trivial quanto eu imaginava. Gostaria da ajuda de vocês em como importar essa planilha de forma tidy no R.

https://tinyurl.com/yc6smzuk

Alguém pode ajudar? Obrigado!

Usando como exemplo a primeira aba:

# Aqui você deve definir um vetor com os nomes das 36 colunas
cols <- paste0("x", 1:36)

"~/Downloads/PRCCOREDZ0 (4).xlsx" |>
  readxl::read_xlsx(skip = 4, col_names = cols, na = c("", "nd")) |>
  dplyr::filter(!is.na(x2)) # Remover notas de rodapé
#> # A tibble: 322 × 36
#>    x1       x2    x3    x4    x5    x6    x7    x8    x9   x10   x11   x12   x13
#>    <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#>  1 35065 0.796 0.859 1.36  1.09     NA    NA    NA    NA 1.06     NA    NA    NA
#>  2 35096 0.854 0.768 0.989 0.660    NA    NA    NA    NA 1.13     NA    NA    NA
#>  3 35125 0.256 0.361 0.998 0.550    NA    NA    NA    NA 0.579    NA    NA    NA
#>  4 35156 1.06  1.03  1.17  0.857    NA    NA    NA    NA 0.856    NA    NA    NA
#>  5 35186 1.29  0.920 1.25  1.25     NA    NA    NA    NA 1.10     NA    NA    NA
#>  6 35217 1.21  1.09  1.24  0.969    NA    NA    NA    NA 1.19     NA    NA    NA
#>  7 35247 1.11  1.02  1.13  0.917    NA    NA    NA    NA 1.11     NA    NA    NA
#>  8 35278 0.838 0.800 1.03  0.820    NA    NA    NA    NA 0.834    NA    NA    NA
#>  9 35309 0.514 0.438 0.706 0.648    NA    NA    NA    NA 0.577    NA    NA    NA
#> 10 35339 0.381 0.299 0.665 0.294    NA    NA    NA    NA 0.363    NA    NA    NA
#> # … with 312 more rows, and 23 more variables: x14 <dbl>, x15 <dbl>, x16 <dbl>,
#> #   x17 <dbl>, x18 <dbl>, x19 <dbl>, x20 <dbl>, x21 <dbl>, x22 <dbl>,
#> #   x23 <dbl>, x24 <dbl>, x25 <dbl>, x26 <dbl>, x27 <dbl>, x28 <dbl>,
#> #   x29 <dbl>, x30 <dbl>, x31 <dbl>, x32 <dbl>, x33 <dbl>, x34 <dbl>,
#> #   x35 <dbl>, x36 <dbl>

Created on 2022-11-27 with reprex v2.0.2