Tengo problemas para formatear mi leyenda. Me gustaría aumentar el espacio vertical entre cada elemento de la leyenda.

Publico la imagen que produce y el código para que me puedan ayudar si lo desean.

Este es el código relativo a la leyenda:

par(fig = c(0, 1, 0, 1), oma = c(0, 0, 0, 0), mar = c(0, 0, 0, 0), new = TRUE)
legend("right", c("$\\lambda < \\lambda_{cr}$ ", "$\\lambda < \\lambda_{cr}$", 
"$\\lambda = \\lambda_{cr}$ ", "$\\lambda = \\lambda_{cr}$ "), xpd = TRUE, 
inset = c(0,0), bty = "n", lty = c(1, 1, 1, 1), lwd=2, col = c("black","green4","red","blue"))