sm <- sample_generator(100, c(0,1), dist="EV1")
moment_estimation (sm, dist="GEV")
ML_estimation (sm, dist="GEV")
Fx (sm, c(-0.051,0.97,-0.024), dist="GEV")
sample_generator (100, c(-0.051,0.97,-0.024), dist="GEV")
moment_estimation (sm, dist="P3")
ML_estimation (sm, dist="P3")
Fx (sm, c(-1.6,0.78,2.8), dist="P3")
Run the code above in your browser using DataLab