Negative Log Likelihood value of Triangular Binomial Distribution

Source: R/Triangle.R

This function will calculate the Negative Log Likelihood value when the vector of binomial random variables and vector of corresponding frequencies are given with the mode value.

NegLLTriBin(x,freq,mode)

Arguments

x

vector of binomial random variables.
freq

vector of frequencies.
mode

single value for mode.

Value

The output of NegLLTriBin will produce a single numeric value.

Details

$$0 < mode=c < 1$$ $$x = 0,1,2,,...$$ $$freq \ge 0$$

NOTE : If input parameters are not in given domain conditions necessary error messages will be provided to go further.

References

Horsnell, G. (1957). Economic acceptance sampling schemes. Journal of the Royal Statistical Society, Series A, 120:148-191.

Karlis, D. & Xekalaki, E., 2008. The Polygonal Distribution. In Advances in Mathematical and Statistical Modeling. Boston: Birkhuser Boston, pp. 21-33.

Available at: http://dx.doi.org/10.1007/978-0-8176-4626-4_2.

Okagbue, H. et al., 2014. Using the Average of the Extreme Values of a Triangular Distribution for a Transformation, and Its Approximant via the Continuous Uniform Distribution. British Journal of Mathematics & Computer Science, 4(24), pp.3497-3507.

Available at: http://www.sciencedomain.org/abstract.php?iid=699&id=6&aid=6427.

Examples

No.D.D <- 0:7    #assigning the Random variables
Obs.fre.1 <- c(47,54,43,40,40,41,39,95) #assigning the corresponding frequencies

NegLLTriBin(No.D.D,Obs.fre.1,.023)   #acquiring the Negative log likelihood value
#> [1] 953.9621