Try this x <- seq(0,15,0.01) plot(x+1, dexp(x, 0.2), c(0,15), c(0,0.8),type="l", ylab="f(x)") lines(x+1, dexp(x, 0.8)) grid() abline(v=1, col="lightgray", lty="dotted",)
Best ep -- View this message in context: http://r.789695.n4.nabble.com/Exponential-distribution-tp3394476p3395829.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
