Сюжет и легенда
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