I did a CDP plot with stat_ecdf function, but I cannot add a legend. This is the code of the CDP plot:
ggplot()+ stat_ecdf(data=df, aes(Apple), geom = &