curve(dlnorm(x),col="red",lty=1,ylab="Density",
xlim=c(0,3),ylim=c(0,.7),lwd=4,axes=F,main="Log Normal")
axis(1,0:3, 0:3,col.axis="blue")
axis(2,  seq(0,.7,.1), seq(0,.7,.1),col.axis="blue")

https