создать новую переменную mtcars с функцией if

Question

Я очень плохо знаком с R и программированием в целом.

Я хотел бы создать новую переменную в фрейме данных mtcars под названием "x". Если передача автоматическая c, то берется сумма mpg и disp. Если коробка передач механическая, то возьмите сумму миль на галлон и цил.

Как бы я это сделал? Спасибо!

Answer 1

Один из способов сделать это - dplyr::mutate() и dplyr::if_else(). Например:

library(dplyr)

mtcars %>% 
  mutate(x = if_else(
    am == 0,
    mpg + disp,
    mpg + cyl
  ))

Или решение base R без необходимости установки дополнительных пакетов:

mtcars$x <- 
  ifelse(mtcars$am == 0,
         mtcars$mpg + mtcars$disp,
         mtcars$mpg + mtcars$cyl
         )
mtcars