Pivotear con tidyr en R
Reformar entre ancho y largo, al estilo tidyverse.
library(tidyr)
library(dplyr)
wide <- tibble(
id = 1:2,
q1 = c(10, 20),
q2 = c(15, 25)
)
long <- wide %>%
pivot_longer(cols = c(q1, q2),
names_to = "quarter",
values_to = "revenue")
back <- long %>%
pivot_wider(names_from = quarter, values_from = revenue)
Cómo funciona
pivot_longerapila columnas en pares clave-valor.names_toyvalues_tonombran las columnas nuevas.pivot_widerlas vuelve a extender.
El intento, en números
- Líneas
- 16
- Caracteres a escribir
- 258
- Tokens
- 75
- Ritmo de tres estrellas
- 100 tpm
Al ritmo de tres estrellas de 100 tokens por minuto, este intento toma unos 45 segundos.
Paso 3 de 3 en Pivotear; paso 3 de 12 en Remodelar y leer.