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