How could I remove NA responses from using the following code?
bar <- ggplot(newdata)
bar + stat_summary(
aes(x = preferred.actual.factor, y = lifesatisfaction, fill = gender),
fun.y = mean,
geom = "bar",
position = "dodge"
) + stat_summary(
aes(x = preferred.actual.factor, y = lifesatisfaction, fill = gender),
fun.data = mean_cl_normal,
geom = "errorbar",
position = position_dodge(width = 0.90),
width = 0.2
) + labs(x = "Time Mismatch", y = "Life Satsifaction")