# invpareto

    0.125

---

    0.5

---

    c(0.891578688791863, 0.75923969635362)

# invpareto initial shape is MLEs

    list(log_scale = 0.961975263550564, log_shape = 2.94009311871754)

---

    list(invpareto.weight = 1, invpareto.scale = 0.961975263550564, 
        invpareto.shape = 2.94009311871754)

# invpareto unbiased scale estimator small n

    0.994110689165773

# invpareto biased shape estimator small n

    3.69530846370174

# invpareto unbiased scale estimator large n

    0.999986691270012

# invpareto unbiased shape estimator large n

    3.00308408539603

