NAG Library Routine Document
e01tgf (dim3_scat_shep)
1
Purpose
e01tgf generates a threedimensional interpolant to a set of scattered data points, using a modified Shepard method.
2
Specification
Fortran Interface
Subroutine e01tgf ( 
m, x, y, z, f, nw, nq, iq, liq, rq, lrq, ifail) 
Integer, Intent (In)  ::  m, nw, nq, liq, lrq  Integer, Intent (Inout)  ::  ifail  Integer, Intent (Out)  ::  iq(liq)  Real (Kind=nag_wp), Intent (In)  ::  x(m), y(m), z(m), f(m)  Real (Kind=nag_wp), Intent (Out)  ::  rq(lrq) 

C Header Interface
#include <nagmk26.h>
void 
e01tgf_ (const Integer *m, const double x[], const double y[], const double z[], const double f[], const Integer *nw, const Integer *nq, Integer iq[], const Integer *liq, double rq[], const Integer *lrq, Integer *ifail) 

3
Description
e01tgf constructs a smooth function $Q\left(x,y,z\right)$ which interpolates a set of $m$ scattered data points $\left({x}_{r},{y}_{r},{z}_{r},{f}_{r}\right)$, for $r=1,2,\dots ,m$, using a modification of Shepard's method. The surface is continuous and has continuous first partial derivatives.
The basic Shepard method, which is a generalization of the twodimensional method described in
Shepard (1968), interpolates the input data with the weighted mean
where
The basic method is global in that the interpolated value at any point depends on all the data, but this routine uses a modification (see
Franke and Nielson (1980) and
Renka (1988a)), whereby the method becomes local by adjusting each
${w}_{r}\left(x,y,z\right)$ to be zero outside a sphere with centre
$\left({x}_{r},{y}_{r},{z}_{r}\right)$ and some radius
${R}_{w}$. Also, to improve the performance of the basic method, each
${q}_{r}$ above is replaced by a function
${q}_{r}\left(x,y,z\right)$, which is a quadratic fitted by weighted least squares to data local to
$\left({x}_{r},{y}_{r},{z}_{r}\right)$ and forced to interpolate
$\left({x}_{r},{y}_{r},{z}_{r},{f}_{r}\right)$. In this context, a point
$\left(x,y,z\right)$ is defined to be local to another point if it lies within some distance
${R}_{q}$ of it. Computation of these quadratics constitutes the main work done by this routine.
The efficiency of the routine is further enhanced by using a cell method for nearest neighbour searching due to
Bentley and Friedman (1979).
The radii
${R}_{w}$ and
${R}_{q}$ are chosen to be just large enough to include
${N}_{w}$ and
${N}_{q}$ data points, respectively, for usersupplied constants
${N}_{w}$ and
${N}_{q}$. Default values of these arguments are provided by the routine, and advice on alternatives is given in
Section 9.2.
This routine is derived from the routine QSHEP3 described by
Renka (1988b).
Values of the interpolant
$Q\left(x,y,z\right)$ generated by this routine, and its first partial derivatives, can subsequently be evaluated for points in the domain of the data by a call to
e01thf.
4
References
Bentley J L and Friedman J H (1979) Data structures for range searching ACM Comput. Surv. 11 397–409
Franke R and Nielson G (1980) Smooth interpolation of large sets of scattered data Internat. J. Num. Methods Engrg. 15 1691–1704
Renka R J (1988a) Multivariate interpolation of large sets of scattered data ACM Trans. Math. Software 14 139–148
Renka R J (1988b) Algorithm 661: QSHEP3D: Quadratic Shepard method for trivariate interpolation of scattered data ACM Trans. Math. Software 14 151–152
Shepard D (1968) A twodimensional interpolation function for irregularly spaced data Proc. 23rd Nat. Conf. ACM 517–523 Brandon/Systems Press Inc., Princeton
5
Arguments
 1: $\mathbf{m}$ – IntegerInput

On entry: $m$, the number of data points.
Constraint:
${\mathbf{m}}\ge 10$.
 2: $\mathbf{x}\left({\mathbf{m}}\right)$ – Real (Kind=nag_wp) arrayInput
 3: $\mathbf{y}\left({\mathbf{m}}\right)$ – Real (Kind=nag_wp) arrayInput
 4: $\mathbf{z}\left({\mathbf{m}}\right)$ – Real (Kind=nag_wp) arrayInput

On entry: ${\mathbf{x}}\left(\mathit{r}\right)$, ${\mathbf{y}}\left(\mathit{r}\right)$, ${\mathbf{z}}\left(\mathit{r}\right)$ must be set to the Cartesian coordinates of the data point $\left({x}_{\mathit{r}},{y}_{\mathit{r}},{z}_{\mathit{r}}\right)$, for $\mathit{r}=1,2,\dots ,m$.
Constraint:
these coordinates must be distinct, and must not all be coplanar.
 5: $\mathbf{f}\left({\mathbf{m}}\right)$ – Real (Kind=nag_wp) arrayInput

On entry: ${\mathbf{f}}\left(\mathit{r}\right)$ must be set to the data value ${f}_{\mathit{r}}$, for $\mathit{r}=1,2,\dots ,m$.
 6: $\mathbf{nw}$ – IntegerInput

On entry: the number
${N}_{w}$ of data points that determines each radius of influence
${R}_{w}$, appearing in the definition of each of the weights
${w}_{\mathit{r}}$, for
$\mathit{r}=1,2,\dots ,m$ (see
Section 3). Note that
${R}_{w}$ is different for each weight. If
${\mathbf{nw}}\le 0$ the default value
${\mathbf{nw}}=\mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(32,{\mathbf{m}}1\right)$ is used instead.
Constraint:
${\mathbf{nw}}\le \mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(40,{\mathbf{m}}1\right)$.
 7: $\mathbf{nq}$ – IntegerInput

On entry: the number
${N}_{q}$ of data points to be used in the least squares fit for coefficients defining the nodal functions
${q}_{r}\left(x,y,z\right)$ (see
Section 3). If
${\mathbf{nq}}\le 0$ the default value
${\mathbf{nq}}=\mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(17,{\mathbf{m}}1\right)$ is used instead.
Constraint:
${\mathbf{nq}}\le 0$ or $9\le {\mathbf{nq}}\le \mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(40,{\mathbf{m}}1\right)$.
 8: $\mathbf{iq}\left({\mathbf{liq}}\right)$ – Integer arrayOutput

On exit: integer data defining the interpolant $Q\left(x,y,z\right)$.
 9: $\mathbf{liq}$ – IntegerInput

On entry: the dimension of the array
iq as declared in the (sub)program from which
e01tgf is called.
Constraint:
${\mathbf{liq}}\ge 2\times {\mathbf{m}}+1$.
 10: $\mathbf{rq}\left({\mathbf{lrq}}\right)$ – Real (Kind=nag_wp) arrayOutput

On exit: real data defining the interpolant $Q\left(x,y,z\right)$.
 11: $\mathbf{lrq}$ – IntegerInput

On entry: the dimension of the array
rq as declared in the (sub)program from which
e01tgf is called.
Constraint:
${\mathbf{lrq}}\ge 10\times {\mathbf{m}}+7$.
 12: $\mathbf{ifail}$ – IntegerInput/Output

On entry:
ifail must be set to
$0$,
$1\text{or}1$. If you are unfamiliar with this argument you should refer to
Section 3.4 in How to Use the NAG Library and its Documentation for details.
For environments where it might be inappropriate to halt program execution when an error is detected, the value
$1\text{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 $\mathbf{1}\text{or}\mathbf{1}$ is used it is essential to test the value of ifail on exit.
On exit:
${\mathbf{ifail}}={\mathbf{0}}$ unless the routine detects an error or a warning has been flagged (see
Section 6).
6
Error Indicators and Warnings
If on entry
${\mathbf{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:
 ${\mathbf{ifail}}=1$

On entry,
liq is too small:
${\mathbf{liq}}=\u2329\mathit{\text{value}}\u232a$.
On entry,
lrq is too small:
${\mathbf{lrq}}=\u2329\mathit{\text{value}}\u232a$.
On entry, ${\mathbf{m}}=\u2329\mathit{\text{value}}\u232a$.
Constraint:
${\mathbf{m}}\ge 10$.
On entry, ${\mathbf{nq}}=\u2329\mathit{\text{value}}\u232a$.
Constraint: ${\mathbf{nq}}\le 0$ or
${\mathbf{nq}}\ge 9$.
On entry, ${\mathbf{nq}}=\u2329\mathit{\text{value}}\u232a$ and ${\mathbf{m}}=\u2329\mathit{\text{value}}\u232a$.
Constraint: ${\mathbf{nq}}\le \mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(40,{\mathbf{m}}1\right)$.
On entry, ${\mathbf{nw}}=\u2329\mathit{\text{value}}\u232a$ and ${\mathbf{m}}=\u2329\mathit{\text{value}}\u232a$.
Constraint: ${\mathbf{nw}}\le \mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(40,{\mathbf{m}}1\right)$.
 ${\mathbf{ifail}}=2$

There are duplicate nodes in the dataset. $\left({\mathbf{x}}\left(\mathit{I}\right),{\mathbf{y}}\left(\mathit{I}\right),{\mathbf{z}}\left(\mathit{I}\right)\right)=\left({\mathbf{x}}\left(\mathit{J}\right),{\mathbf{y}}\left(\mathit{J}\right),{\mathbf{z}}\left(\mathit{J}\right)\right)$ for: $\mathit{I}=\u2329\mathit{\text{value}}\u232a$ and $\mathit{J}=\u2329\mathit{\text{value}}\u232a$. The interpolant cannot be derived.
 ${\mathbf{ifail}}=3$

All nodes are coplanar. There is no unique solution.
 ${\mathbf{ifail}}=99$
An unexpected error has been triggered by this routine. Please
contact
NAG.
See
Section 3.9 in How to Use the NAG Library and its Documentation for further information.
 ${\mathbf{ifail}}=399$
Your licence key may have expired or may not have been installed correctly.
See
Section 3.8 in How to Use the NAG Library and its Documentation for further information.
 ${\mathbf{ifail}}=999$
Dynamic memory allocation failed.
See
Section 3.7 in How to Use the NAG Library and its Documentation for further information.
7
Accuracy
On successful exit, the function generated interpolates the input data exactly and has quadratic accuracy.
8
Parallelism and Performance
e01tgf is threaded by NAG for parallel execution in multithreaded implementations of the NAG Library.
e01tgf makes calls to BLAS and/or LAPACK routines, which may be threaded within the vendor library used by this implementation. Consult the documentation for the vendor library for further information.
Please consult the
X06 Chapter Introduction for information on how to control and interrogate the OpenMP environment used within this routine. Please also consult the
Users' Note for your implementation for any additional implementationspecific information.
The time taken for a call to
e01tgf will depend in general on the distribution of the data points. If
x,
y and
z are uniformly randomly distributed, then the time taken should be O(
m). At worst
$\mathit{O}\left({{\mathbf{m}}}^{2}\right)$ time will be required.
Default values of the arguments ${N}_{w}$ and ${N}_{q}$ may be selected by calling e01tgf with ${\mathbf{nw}}\le 0$ and ${\mathbf{nq}}\le 0$. These default values may well be satisfactory for many applications.
If nondefault values are required they must be supplied to
e01tgf through positive values of
nw and
nq. Increasing these arguments makes the method less local. This may increase the accuracy of the resulting interpolant at the expense of increased computational cost. The default values
${\mathbf{nw}}=\mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(32,{\mathbf{m}}1\right)$ and
${\mathbf{nq}}=\mathrm{min}\phantom{\rule{0.125em}{0ex}}\left(17,{\mathbf{m}}1\right)$ have been chosen on the basis of experimental results reported in
Renka (1988a). In these experiments the error norm was found to vary smoothly with
${N}_{w}$ and
${N}_{q}$, generally increasing monotonically and slowly with distance from the optimal pair. The method is not therefore thought to be particularly sensitive to the argument values. For further advice on the choice of these arguments see
Renka (1988a).
9.3
Internal Changes
Internal changes have been made to this routine as follows:
 At Mark 26.0: The algorithm used by this routine, based on a Modified Shepard method, has been changed to produce more reliable results for some data sets which were previously not well handled. In addition, handling of evaluation points which are far away from the original data points has been improved by use of an extrapolation method which returns useful results rather than just an error message as was done at earlier Marks.
 At Mark 26.1: The algorithm has undergone further changes which enable it to work better on certain data sets, for example data presented on a regular grid. The results returned when evaluating the function at points which are not in the original data set used to construct the interpolating function are now likely to be slightly different from those returned at previous Marks of the Library, but the function still interpolates the original data.
For details of all known issues which have been reported for the NAG Library please refer to the
Known Issues list.
10
Example
This program reads in a set of
$30$ data points and calls
e01tgf to construct an interpolating function
$Q\left(x,y,z\right)$. It then calls
e01thf to evaluate the interpolant at a set of points.
Note that this example is not typical of a realistic problem: the number of data points would normally be larger.
10.1
Program Text
Program Text (e01tgfe.f90)
10.2
Program Data
Program Data (e01tgfe.d)
10.3
Program Results
Program Results (e01tgfe.r)