Resúmenes por grupo en R base en R

Resumir por grupo sin ningún paquete.

by_cyl <- aggregate(mpg ~ cyl, data = mtcars, FUN = mean)
two_way <- aggregate(mpg ~ cyl + am, data = mtcars, FUN = median)

counts <- table(mtcars$cyl)
cross <- table(mtcars$cyl, mtcars$am)

split_groups <- split(mtcars$mpg, mtcars$cyl)
group_sds <- sapply(split_groups, sd)
overall <- tapply(mtcars$mpg, mtcars$cyl, mean)

Cómo funciona

1. aggregate aplica una función por grupo de la fórmula.
2. table cuenta categorías, de una vía o cruzadas.
3. split más sapply, o tapply, hacen el mismo trabajo.

El intento, en números

Líneas

9

Caracteres a escribir

323

Tokens

88

Ritmo de tres estrellas

95 tpm

Al ritmo de tres estrellas de 95 tokens por minuto, este intento toma unos 56 segundos.

Escribe este fragmento

Paso 3 de 4 en Remodelar y combinar; paso 6 de 8 en Data frames en R base.

← Anterior Siguiente →