fb.saddle: Saddlepoint approximations of the Fisher-Bingham...

Description Usage Arguments Details Value Author(s) References See Also Examples

View source: R/fb.saddle.R

Description

It calculates the logarithm of the normalising constant of the Fisher-Bingham distribution.

Usage

1
fb.saddle(gam, lam)

Arguments

gam

A numeric vector containing the parameters of the Fisher part.

lam

All the eigenvalues of the Bingham part. Not just the non zero ones.

Details

It calculate the three approximations given by Kume and Wood (2005) and it uses the Fisher-Bingham parametrization of that paper.

Value

A list including:

first oder

The first order approximation

second oder

The second order approximation

third oder

The third order approximation

Author(s)

Michail Tsagris

R implementation and documentation: Michail Tsagris <mtsagris@yahoo.gr> and Giorgos Athineou <athineou@csd.uoc.gr>

References

Kume Alfred and Wood Andrew T.A. (2005). Saddlepoint approximations for the Bingham and Fisher-Bingham normalizing constants. Biometrika, 92(2):465-476

See Also

kent.logcon, rfb, kent.mle, rbingham

Examples

1
2
3
4
5
6
7
8
9
p <- 3  ;  k <- 1
0.5 * p * log(2 * pi) - (p/2 - 1) * log(k) + log( besselI(k, p/2 - 1, expon.scaled = TRUE) ) + k
## normalising constant of the
## von Mises-Fisher distribution
fb.saddle( c(0, k, 0), c(0, 0, 0) ) ## saddlepoint approximation

## Normalising constant of the Kent distribution
fb.saddle( c(0, 10, 0), c(0, -2, 2) )
kent.logcon(10, 2)

Directional documentation built on July 25, 2017, 5:01 p.m.

Search within the Directional package
Search all R packages, documentation and source code