Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
perfect.sample2 = function(n, dist, ...) match.fun(paste('q', dist, sep=''))((1:n) / (n+1), ...)
all.equal(perfect.sample(100, 'norm'), perfect.sample2(100, 'norm')) # => T
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment