apply inv.logit and predict with response variable code example

Example: how to code binary response in r

data$response <- ifelse(response == "yes", 1, 0)