Converting factors to binary in R

Question

I am trying to convert a factor variable into binary / boolean (0 or 1).

Sample data:

df  <-data.frame(a = c(1,2,3), b = c(1,1,2), c = c("Rose","Pink","Red"), d = c(2,3,4))

Trying to transform it like this: a,b,IsRose,IsPink,IsRed,d

For that, I tried the following with little success.

library(ade4)
acm.disjonctif(df)

Answer 1

Just for completeness, building up on this solution (https://stackoverflow.com/a/33990970/2725773), here's an update with the latest tidyverse packages.

library(tidyverse)

df %>%
  mutate(value = 1,
         c = paste0("Is", c)) %>%
  pivot_wider(names_from  = c,
              values_from = value,
              values_fill = 0)

Answer 2

You can do this with reshaping:

library(dplyr)
library(tidyr)

df %>%
  mutate(value = 1,
         c = paste0("Is", c)) %>%
  spread(c, value, fill = 0)