nntsloglik {CircNNTSR}

NNTS log-likelihood function

Description

Computes the log-likelihood function with NNTS density for data

Usage

nntsloglik(data, cpars = 1/sqrt(2 * pi), M = 0)

Arguments

data

Vector with observed angles in radians.

cpars

Vector of complex numbers of dimension M+1. The first element is a real and positive number. The sum of the squared moduli of the c parameters must be equal to 1/(2*pi).

M

Number of components in the NNTS

Value

The function returns the value of the log-likelihood function for the data

Author(s)

Juan Jose Fernandez-Duran and Maria Mercedes Gregorio-Dominguez

References

Fernandez-Duran, J.J. (2004). Circular Distributions Based on Nonnegative Trigonometric Sums, Biometrics, 60(2), 499-503.

Examples

a<-c(runif(10,3*pi/2,2*pi-0.00000001),runif(10,pi/2,pi-0.00000001))
est<-nntsmanifoldnewtonestimation(a,2)
ccoef<-est$cestimates[,2]
nntsloglik(a,ccoef,2)