## ghFit -
# Simulate random variates HYP(1.5, 0.3, 0.5, -1.0):
set.seed(1953)
s = rgh(n = 1000, alpha = 1.5, beta = 0.3, delta = 0.5, mu = -1.0)
## ghFit -
# Fit Parameters:
# Note, this may take some time.
# Starting vector (1, 0, 1, mean(s)):
ghFit(s, alpha = 1, beta = 0, delta = 1, mu = mean(s), doplot = TRUE)
Run the code above in your browser using DataLab