I know that the r plot and ggplot will help me to visualize the data but they don't allow plotting logistic regression curve when you have categorical variables as independent variables (x-axis). Is there any solution, or am I missing something? Thank you in advance.

For example:

g <- ggplot(decision_use, aes(x=decision, y=use)) + geom_point(alpha=.1) +

geom_smooth(method = "glm",

method.args = list(family = "binomial"),

se = FALSE)

and

plot(decision, use)

g=glm(use~decision,family=binomial, decision_use)

curve(predict(g,data.frame(decision=x),type="resp"),add=TRUE)

With decision as types of people and use as 1 or 0.