Boa noite a todos, tenho um gráfico abaixo e gostaria de saber se existe a possibilidade de colocar um subscrito no beta que está na legenda. Como por exemplo um beta_0. require(sn) x=seq(-5,5,by=0.01) a=dsn(x,0,1,0) b=dsn(x,0,1,-1) plot(x,a,type="l",ylim=c(0,0.8),xlim=c(-4,4),lwd=2.5,xlab="Z",ylab=expression(paste("Densidades NA(",lambda,")")),cex.lab=1.3) lines(x,b,lwd=2.5,lty=2,col=2) lines(x,c,lwd=2.5,lty=3,col=3) legend(1.5,0.79,expression(paste(beta,"=",0)),col=1,lty=1,box.lty=0) legend(1.5,0.75,expression(paste(beta,"=",-1)),col=2,lty=2,box.lty=0) Abraços -- Luís Gustavo Silva e Silva