R/oh_encode.R

Defines functions oh_encode

oh_encode <- function(df,x){
  x=enquo(x)
  df%>%
    mutate(wow = 1)%>%
    spread(key=!!x,value = wow, fill = 0,sep = "_")

}
codemasta14/codyR documentation built on May 5, 2019, 7:08 a.m.