r - Changing legend properties for ifelse condition color -

i've created scatter plot using code below. got idea how can customize legend title , labels?

x <- ggplot(full_data) x + geom_point(aes(y=r_morning_noon_no_min,x=as.integer(rownames(full_data)),col=ifelse(prediction==1,'green','red'))) +   geom_hline(yintercept = mean_rm,color="red") +   geom_hline(yintercept = mean_rm2,color="green") +   ggtitle("muster von skalierten haushalten nach pensionierung separiert") +   labs(x="haushalt id") 

scale_color_manual(name="xxx",values=c("red","green"),labels=c("xxx","xxx"))