# NOT RUN {
shape1 <- 1.5; shape2 <- 0.5; x <- seq(-5, 8, length = 1001)
plot(x, dlogF(x, shape1, shape2), type = "l",
las = 1, col = "blue", ylab = "pdf",
main = "log F density function")
# }
Run the code above in your browser using DataLab