NAG FL Interface
e01zaf (dimn_​grid)

1 Purpose

e01zaf interpolates data at a point in n-dimensional space, that is defined by a set of gridded data points. It offers three methods to interpolate the data: Linear Interpolation, Cubic Interpolation and Weighted Average.

2 Specification

Fortran Interface
Subroutine e01zaf ( d, narr, uniform, axis, lx, v, point, method, k, wf, ans, ifail)
Integer, Intent (In) :: d, narr(d), lx, method, k
Integer, Intent (Inout) :: ifail
Real (Kind=nag_wp), Intent (In) :: axis(lx), v(*), point(d), wf
Real (Kind=nag_wp), Intent (Out) :: ans
Logical, Intent (In) :: uniform
C Header Interface
#include <nag.h>
void  e01zaf_ (const Integer *d, const Integer narr[], const logical *uniform, const double axis[], const Integer *lx, const double v[], const double point[], const Integer *method, const Integer *k, const double *wf, double *ans, Integer *ifail)
The routine may be called by the names e01zaf or nagf_interp_dimn_grid.

3 Description

e01zaf interpolates an n-dimensional point within a set of gridded data points, Z= z1j1,z2j2,,zdjd , with corresponding data values F= f1j1,f2j2,,fdjd where, for the ith dimension, ji=1,,ni and ni is the number of ordinates in the ith dimension.
A hypercube of 2kd data points h1,h2,,h2kdZ, where hi=hi1,hi2,,hid and the corresponding data values are fhiF, around the given point, x=x1,x2,,xd, is found and then used to interpolate using one of the following three methods.
  1. (i)Weighted Average, that is a modification of Shepard's method (Shepard (1968)) as used for scattered data in e01zmf. This method interpolates the data with the weighted mean
    Q x = r=1 2kd wr x fr r=1 2kd wr x ,  
    where fr=fhr, wr x = 1 D x - hr and D y = y1ρ + y2ρ + + ydρ , for a given value of ρ.
  2. (ii)Linear Interpolation, which takes 2d surrounding data points (k=1) and performs two one-dimensional linear interpolations in each dimension on data points ha and hb, reducing the dimension every iteration until it has reached an answer. The formula for linear interpolation in dimension i is simply
    f = fa + xi-hai fb-fa hbi-hai ,  
    where fr=fhr and hai<xi<hbi.
  3. (iii)Cubic Interpolation, based on cubic convolution (Keys (1981)). In a similar way to the Linear Interpolation method, it performs the interpolations in one dimension reducing it each time, however it requires four surrounding data points in each dimension (k=2), two in each direction h-1,h0,h1,h2. The following is used to calculate the one-dimensional interpolant in dimension i
    f = 12 1 t t2 t3 0 2 0 0 -1 0 1 0 2 -5 4 -1 -1 3 -3 1 f-1 f0 f1 f2  
    where t=xi-h0i and fr=fhr.

4 References

Keys R (1981) Cubic Convolution Interpolation for Digital Image Processing IEEE Transactions on Acoutstics, Speech, and Signal Processing Vol ASSP-29 No. 6 1153–1160 http://hmi.stanford.edu/doc/Tech_Notes/HMI-TN-2004-004-Interpolation/Keys_cubic_interp.pdf
Shepard D (1968) A two-dimensional interpolation function for irregularly spaced data Proc. 23rd Nat. Conf. ACM 517–523 Brandon/Systems Press Inc., Princeton

5 Arguments

1: d Integer Input
On entry: d, the number of dimensions.
Constraint: d2.
2: narrd Integer array Input
On entry: the number of data ordinates in each dimension, with narri=ni, for i=1,2,,d.
Constraint: narri2.
3: uniform Logical Input
On entry: states whether the data points are uniformly spaced.
uniform=.TRUE.
The data points are uniformly spaced.
uniform=.FALSE.
The data points are not uniformly spaced.
Constraint: if method=3, uniform must be .TRUE..
4: axislx Real (Kind=nag_wp) array Input
On entry: defines the axis. If the data points are uniformly spaced (see argument uniform) axis should contain the start and end of each dimension x11,x1n1,,xd1,xdnd .
If the data points are not uniformly spaced, axis should contain all the data ordinates for each dimension x11,x12,,x1n1,,xd1,xd2,,xdnd.
Constraint: axis must be strictly increasing in each dimension.
5: lx Integer Input
On entry: the dimension of the array axis as declared in the (sub)program from which e01zaf is called.
Constraints:
  • if uniform=.TRUE., lx=2d;
  • if uniform=.FALSE., lx=i=1dnarri.
6: v* Real (Kind=nag_wp) array Input
Note: the dimension of the array v must be at least i=1 d narri.
On entry: holds the values of the data points in such an order that the index of a data value with coordinates z1,z2,,zd is
i=1 d zinSin, 
where Si=narrl:l=1,,i-1 e.g., x11,x21,,xd1,x12,x21,,xd1,,x1nd,x21,,xd1,x11,x22,,xd1,x12,x22,,xd1,,x1nd,x2nd,,xdnd.
7: pointd Real (Kind=nag_wp) array Input
On entry: x, the point at which the data value is to be interpolated.
Constraint: the point must lie inside the limits of the data values in each dimension supplied in axis.
8: method Integer Input
On entry: the method to be used.
method=1
Weighted Average.
method=2
Linear Interpolation.
method=3
Cubic Interpolation.
Constraint: method=1, 2 or 3.
9: k Integer Input
On entry: if method=1, k controls the number of data points used in the Weighted Average method, with k points used in each dimension, either side of the interpolation point. The total number of data points used for the interpolation will therefore be 2kd.
If method1, then k is not referenced and need not be set.
Constraint: if method=1, k1.
10: wf Real (Kind=nag_wp) Input
On entry: the power used for the weighted average such that a high power will cause closer points to be more heavily weighted.
Constraint: if method=1, 1.0wf15.0.
11: ans Real (Kind=nag_wp) Output
On exit: holds the result of the interpolation.
12: ifail Integer Input/Output
On entry: ifail must be set to 0, -1 or 1. If you are unfamiliar with this argument you should refer to Section 4 in the Introduction to the NAG Library FL Interface for details.
For environments where it might be inappropriate to halt program execution when an error is detected, the value -1 or 1 is recommended. If the output of error messages is undesirable, then the value 1 is recommended. Otherwise, if you are not familiar with this argument, the recommended value is 0. When the value -1 or 1 is used it is essential to test the value of ifail on exit.
On exit: ifail=0 unless the routine detects an error or a warning has been flagged (see Section 6).

6 Error Indicators and Warnings

If on entry ifail=0 or -1, explanatory error messages are output on the current error message unit (as defined by x04aaf).
Errors or warnings detected by the routine:
ifail=1
On entry, d=value.
Constraint: d2.
ifail=2
On entry, narrvalue=value.
Constraint: narri2.
ifail=4
On entry, axis decreases in dimension value.
Constraint: axis definition must be strictly increasing.
ifail=5
On entry, lx=value, d=value.
Constraint: if uniform=.TRUE., lx=2d.
On entry, lx=value, narr=value.
Constraint: if uniform=.FALSE., lx=narr.
ifail=7
On entry, k=value.
Constraint: if method=1, k1.
ifail=8
On entry, pointvalue=value and data range =value,value.
Constraint: point must be within the data range.
ifail=9
On entry, method=value.
Constraint: method=1, 2 or 3.
On entry, method=3 and uniform=.FALSE..
Constraint: if method=3, uniform must be .TRUE..
ifail=10
On entry, wf=value.
Constraint: if method=1, 1.0wf15.0.
ifail=101
Cubic Interpolation method does not have enough data surrounding point; interpolation not possible.
ifail=201
Warning: the size of k has been reduced, due to too few data points around point.
ifail=-99
An unexpected error has been triggered by this routine. Please contact NAG.
See Section 7 in the Introduction to the NAG Library FL Interface for further information.
ifail=-399
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library FL Interface for further information.
ifail=-999
Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

For most data the Cubic Interpolation method will provide the best interpolation but it is data dependent. If the data is linear, the Linear Interpolation method will be best. For noisy data the Weighted Average method is advised with wf<2.0 and k>1. This will include more data points and give them a greater influence to the answer.

8 Parallelism and Performance

e01zaf is not threaded in any implementation.

9 Further Comments

None.

10 Example

This program takes a set of uniform three-dimensional grid data points which come from the function
fx= x13- x22+ x3 .  
e01zaf then interpolates the data at the point 1.10,0.25,0.75 using all three methods. The answers and the absolute errors are then printed.

10.1 Program Text

Program Text (e01zafe.f90)

10.2 Program Data

Program Data (e01zafe.d)

10.3 Program Results

Program Results (e01zafe.r)