Sampler for a Weibull distribution.

Returns a function that draws n independent samples from the Weibull distribution.

# S3 method for class 'weibull_dist'
sampler(x, ...)

Arguments

x

A weibull_dist object.

...

Additional arguments (not used).

Value

A function function(n = 1, ...) returning a numeric vector of length n.

Examples

x <- weibull_dist(shape = 2, scale = 3)
s <- sampler(x)
set.seed(42)
s(5)
#> [1] 0.8952033 0.7648030 3.3558131 1.2931024 1.9980168