typestar

mutate y case_when en R

Agregar y derivar columnas dentro de un pipeline.

library(dplyr)

cars <- mtcars %>%
  mutate(
    kpl = mpg * 0.425,
    weight_kg = wt * 453.6,
    heavy = wt > 3.5,
    class = if_else(cyl > 4, "big", "small")
  )

only_new <- transmute(mtcars, ratio = mpg / wt)
banded <- mutate(mtcars,
                 band = case_when(
                   mpg < 15 ~ "thirsty",
                   mpg < 25 ~ "average",
                   TRUE ~ "efficient"
                 ))

Cómo funciona

  1. mutate agrega columnas calculadas a partir de las existentes.
  2. if_else es un condicional vectorizado seguro con los tipos.
  3. case_when maneja varias condiciones en orden.

El intento, en números

Líneas
17
Caracteres a escribir
304
Tokens
85
Ritmo de tres estrellas
95 tpm

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

Escribe este fragmento

Paso 4 de 4 en Columnas nuevas; paso 13 de 27 en dplyr.

← Anterior Siguiente →