complot et légende

plot(KM, lwd=3, col=c("black", "red", "green"), cex.axis=0.8, xlab="days", yaxs = "i", xaxs = "i")
#lwd - line width, yaxs = "i" - start with 0
legend(70, 0.9, legend=levels(male.flies$TYPE),
                col=c("black", "red", "green"), lwd=3)

Diana H