NAG CL Interface
s14apc (gamma_​log_​real_​vector)

Settings help

CL Name Style:


1 Purpose

s14apc returns an array of values of the logarithm of the gamma function, lnΓ(x).

2 Specification

#include <nag.h>
void  s14apc (Integer n, const double x[], double f[], Integer ivalid[], NagError *fail)
The function may be called by the names: s14apc, nag_specfun_gamma_log_real_vector or nag_log_gamma_vector.

3 Description

s14apc calculates an approximate value for lnΓ(x) for an array of arguments xi, for i=1,2,,n. It is based on rational Chebyshev expansions.
Denote by Rn,mi(x)=Pni(x)/Qmi(x) a ratio of polynomials of degree n in the numerator and m in the denominator. Then:
For each expansion, the specific values of n and m are selected to be minimal such that the maximum relative error in the expansion is of the order 10-d, where d is the maximum number of decimal digits that can be accurately represented for the particular implementation (see X02BEC).
Let ε denote machine precision and let xhuge denote the largest positive model number (see X02ALC). For x<0.0 the value lnΓ(x) is not defined; s14apc returns zero and exits with fail.code= NW_IVALID. It also exits with fail.code= NW_IVALID when x=0.0, and in this case the value xhuge is returned. For x in the interval (0.0,ε], the function lnΓ(x)=-ln(x) to machine accuracy.
Now denote by xbig the largest allowable argument for lnΓ(x) on the machine. For (xbig)1/4<xxbig the Rn,m4(1/x2) term in Equation (1) is negligible. For x>xbig there is a danger of setting overflow, and so s14apc exits with fail.code= NE_INT and returns xhuge. The value of xbig is given in the Users' Note for your implementation.

4 References

NIST Digital Library of Mathematical Functions
Cody W J and Hillstrom K E (1967) Chebyshev approximations for the natural logarithm of the gamma function Math.Comp. 21 198–203

5 Arguments

1: n Integer Input
On entry: n, the number of points.
Constraint: n0.
2: x[n] const double Input
On entry: the argument xi of the function, for i=1,2,,n.
Constraint: x[i-1]>0, for i=1,2,,n.
3: f[n] double Output
On exit: lnΓ(xi), the function values.
4: ivalid[n] Integer Output
On exit: ivalid[i-1] contains the error code for xi, for i=1,2,,n.
ivalid[i-1]=0
No error.
ivalid[i-1]=1
xi0.
ivalid[i-1]=2
xi is too large and positive. The threshold value is the same as for fail.code= NE_REAL_ARG_GT in s14abc , as defined in the Users' Note for your implementation.
5: fail NagError * Input/Output
The NAG error argument (see Section 7 in the Introduction to the NAG Library CL Interface).

6 Error Indicators and Warnings

NE_ALLOC_FAIL
Dynamic memory allocation failed.
See Section 3.1.2 in the Introduction to the NAG Library CL Interface for further information.
NE_BAD_PARAM
On entry, argument value had an illegal value.
NE_INT
On entry, n=value.
Constraint: n0.
NE_INTERNAL_ERROR
An internal error has occurred in this function. Check the function call and any array sizes. If the call is correct then please contact NAG for assistance.
See Section 7.5 in the Introduction to the NAG Library CL Interface for further information.
NE_NO_LICENCE
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library CL Interface for further information.
NW_IVALID
On entry, at least one value of x was invalid.
Check ivalid for more information.

7 Accuracy

Let δ and ε be the relative errors in the argument and result respectively, and E be the absolute error in the result.
If δ is somewhat larger than machine precision, then
E |x×Ψ(x)| δ   and   ε | x×Ψ(x) lnΓ (x) | δ  
where Ψ(x) is the digamma function Γ(x) Γ(x) . Figure 1 and Figure 2 show the behaviour of these error amplification factors.
Figure 1
Figure 1
Figure 2
Figure 2
These show that relative error can be controlled, since except near x=1 or 2 relative error is attenuated by the function or at least is not greatly amplified.
For large x, ε(1+ 1lnx ) δ and for small x, ε 1lnx δ.
The function lnΓ(x) has zeros at x=1 and 2 and hence relative accuracy is not maintainable near those points. However, absolute accuracy can still be provided near those zeros as is shown above.
If however, δ is of the order of machine precision, then rounding errors in the function's internal arithmetic may result in errors which are slightly larger than those predicted by the equalities. It should be noted that even in areas where strong attenuation of errors is predicted the relative precision is bounded by the effective machine precision.

8 Parallelism and Performance

s14apc is not threaded in any implementation.

9 Further Comments

None.

10 Example

This example reads values of x from a file, evaluates the function at each value of xi and prints the results.

10.1 Program Text

Program Text (s14apce.c)

10.2 Program Data

Program Data (s14apce.d)

10.3 Program Results

Program Results (s14apce.r)