Triangle distribution method of moments estimate

triangle_mom(x)

Arguments

x

triangle distribution sample

Value

a vector of the parameter estimates

Examples

set.seed(1204)
x <- rtriangle(20, 0, 2, 1.5)
triangle_mom(x)
#> [1] 0.6188926 1.9317298 1.2443817