/ Published in: R
xm = minimum, k=pareto index
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
rpareto = function(n,xm,k) { (1-runif(n))^(-1/k) * xm }