
Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
uvdata <- rgev(100, loc = 0.13, scale = 1.1, shape = 0.2)
M1 <- fgev(uvdata)
# }
# NOT RUN {
M1P <- profile(M1)
# }
# NOT RUN {
M1JP <- profile2d(M1, M1P, which = c("scale", "shape"))
# }
# NOT RUN {
plot(M1JP)
# }
Run the code above in your browser using DataLab