deldir (version 0.1-9)

deldir: Delaunay triangulation and Dirichlet tessellation

Description

This function computes the Delaunay triangulation (and hence the Dirichlet or Voronoi tesselation) of a planar point set according to the second (iterative) algorithm of Lee and Schacter --- see REFERENCES. The triangulation is made to be with respect to the whole plane by suspending it from so-called ideal points (-Inf,-Inf), (Inf,-Inf) (Inf,Inf), and (-Inf,Inf). The triangulation is also enclosed in a finite rectangular window. A set of dummy points may be added, in various ways, to the set of data points being triangulated.

Usage

deldir(x, y, dpl=NULL, rw=NULL, eps=1e-09, sort=TRUE, plotit=FALSE,
       digits=6, z=NULL, zdum=NULL, suppressMsge=FALSE, ...)

Arguments

x,y
The coordinates of the point set being triangulated. These can be given by two arguments x and y which are vectors or by a single argument x which is either a data frame or a generic list.

If x is a data frame then the x coordin

dpl
A list describing the structure of the dummy points to be added to the data being triangulated. The addition of these dummy points is effected by the auxiliary function dumpts(). The list may have components:
  • ndx: The x-dimension of
rw
The coordinates of the corners of the rectangular window enclosing the triangulation, in the order (xmin, xmax, ymin, ymax). Any data points (including dummy points) outside this window are discarded. If this argument is omitted, it defaults to values gi
eps
A value of epsilon used in testing whether a quantity is zero, mainly in the context of whether points are collinear. If anomalous errors arise, it is possible that these may averted by adjusting the value of eps upward or downward.
sort
Logical argument; if TRUE (the default) the data (including dummy points) are sorted into a sequence of bins prior to triangulation; this makes the algorithm slightly more efficient. Normally one would set sort equal to
plotit
Logical argument; if TRUE a plot is produced. The nature of the plot may be controlled by using the ... argument to pass appropriate arguments to plot.deldir(). Without further instruction a plot o
digits
The number of decimal places to which all numeric values in the returned list should be rounded. Defaults to 6.
z
An optional vector of auxiliary values or weights associated with the respective points. (NOTE: These weights are values associated with the points and hence with the tiles of the tessellation prod
zdum
Values of z to be associated with any dummy points that are created. See Warnings.
suppressMsge
Logical scalar indicating whether a message (alerting the user to changes from previous versions of deldir) should be suppressed.
...
Auxiliary arguments add, wlines, wpoints, number, nex, col, lty, pch, xlim, and ylim (and possibly other plotting parameters) may be passed to plot.deldir through ... if plotit=TRUE.

Value

  • A list (of class deldir), invisible if plotit=TRUE, with components:
  • delsgsa data frame with 6 columns. The first 4 entries of each row are the coordinates of the points joined by an edge of a Delaunay triangle, in the order (x1,y1,x2,y2). The last two entries are the indices of the two points which are joined.
  • dirsgsa data frame with 8 columns. The first 4 entries of each row are the coordinates of the endpoints of one the edges of a Dirichlet tile, in the order (x1,y1,x2,y2). The fifth and sixth entries are the indices of the two points, in the set being triangulated, which are separated by that edge. The seventh and eighth entries are logical values. The seventh indicates whether the first endpoint of the corresponding edge of a Dirichlet tile is a boundary point (a point on the boundary of the rectangular window). Likewise for the eighth entry and the second endpoint of the edge.
  • summarya data frame with 9 or 10 columns and n.data + n.dumrows (see below). The rows correspond to the points in the set being triangulated. The column names are x (the x-coordinate of the point), y (the y-coordinate), z (the auxiliary values or weights if these were specified), n.tri (the number of Delaunay triangles emanating from the point), del.area (1/3 of the total area of all the Delaunay triangles emanating from the point), del.wts (the corresponding entry of the del.area column divided by the sum of this column); n.tside (the number of sides --- within the rectangular window --- of the Dirichlet tile surrounding the point), nbpt (the number of points in which the Dirichlet tile intersects the boundary of the rectangular window), dir.area (the area of the Dirichlet tile surrounding the point), and dir.wts (the corresponding entry of the dir.area column divided by the sum of this column).

    Note that the factor of 1/3 associated with the del.area column arises because each triangle occurs three times --- once for each corner.

  • n.datathe number of real (as opposed to dummy) points in the set which was triangulated, with any duplicate points eliminated. The first n.data rows of summary correspond to real points.
  • n.dumthe number of dummy points which were added to the set being triangulated, with any duplicate points (including any which duplicate real points) eliminated. The last n.dum rows of summary correspond to dummy points.
  • del.areathe area of the convex hull of the set of points being triangulated, as formed by summing the del.area column of summary.
  • dir.areathe area of the rectangular window enclosing the points being triangulated, as formed by summing the dir.area column of summary.
  • rwthe specification of the corners of the rectangular window enclosing the data, in the order (xmin, xmax, ymin, ymax).
  • ind.origA vector of the indices of the points (x,y) in the set of coordinates initially supplied to deldir() before duplicate points (if any) were removed. These coordinates are used by triang.list().

Remark:

If ndx >= 2 and ndy >= 2, then the rectangular window IS the convex hull, and so the values of del.area and dir.area (if the latter is not NULL) are identical.

Side Effects

If plotit==TRUE a plot of the triangulation and/or tessellation is produced or added to an existing plot.

Warnings

  1. The process for determining if points are duplicated changed between versions 0.1-9 and 0.1-10. Previously there was an argumentfracfor this function, which defaulted to 0.0001. Points were deemed to be duplicates if the difference inx-coordinates was less thanfractimes the width ofrwandy-coordinates was less thanfractimes the height ofrw. This process has been changed to one which usesduplicated()on the data frame whose columns arexandy.

    As a result it may happen that points which were previously eliminated as duplicates will no longer be eliminated. (And possibly vice-versa.)

  2. The componentsdelsgsandsummaryof the value returned bydeldir()are nowdata framesrather than matrices. The componentsummarywas changed to allow theauxiliaryvalueszto be of arbitrary mode (i.e. not necessarily numeric). The componentdelsgswas then changed for consistency. Note that the othermatrix-likecomponentdirsgshas been a data frame since time immemorial.

    A message alerting the user to the foregoing two items is printed out the first time thatdeldir()is called withsuppressMsge=FALSEin a given session. In succeeding calls todeldir()in the same session, no message is printed. (I.e. thealertingmessage is printedat most oncein any given session.)

    Thealertingmessage isnotproduced via thewarning()function, sosuppressWarnings()willnotsuppress its appearance. To effect such suppression (necessary only on the first call todeldir()in a given session) one must set thesuppressMsgeargument ofdeldirequal toTRUE.

  3. If any dummy points are created, and if a vectorz, ofauxiliaryvalues orweightsassociated with the points being triangulated, is supplied, then it is up to the user to supply the corresponding auxiliary values or weights associated with the dummy points. These values should be supplied aszdum. Ifzdumis not supplied then the auxiliary values or weights associated with the dummy points are all taken to be missing values (i.e.NA).

Details

This package is a (straightforward) adaptation of the Splus library section ``delaunay'' to R. That library section is an implementation of the Lee-Schacter algorithm, which was originally written as a stand-alone Fortran program in 1987/88 by Rolf Turner, while with the Division of Mathematics and Statistics, CSIRO, Sydney, Australia. It was re-written as an Splus function (using dynamically loaded Fortran code), by Rolf Turner while visiting the University of Western Australia, May, 1995.

Further revisions were made December 1996. The author gratefully acknowledges the contributions, assistance, and guidance of Mark Berman, of D.M.S., CSIRO, in collaboration with whom this project was originally undertaken. The author also acknowledges much useful advice from Adrian Baddeley, formerly of D.M.S., CSIRO (now of CMIS, CSIRO and Adjunct Professor of Statistics at the University of Western Australia). Daryl Tingley of the Department of Mathematics and Statistics, University of New Brunswick provided some helpful insight. Special thanks are extended to Alan Johnson, of the Alaska Fisheries Science Centre, who supplied two data sets which were extremely valuable in tracking down some errors in the code.

Don MacQueen, of Lawrence Livermore National Lab, wrote an Splus driver function for the old stand-alone version of this software. That driver, which was available on Statlib, is now deprecated in favour of the current package ``delaunay'' package. Don also collaborated in the preparation of that package.

See the ChangeLog for information about further revisions and bug-fixes.

References

Lee, D. T., and Schacter, B. J. Two algorithms for constructing a Delaunay triangulation, Int. J. Computer and Information Sciences, Vol. 9, No. 3, 1980, pp. 219 -- 242.

Ahuja, N. and Schacter, B. J. (1983). Pattern Models. New York: Wiley.

See Also

plot.deldir() tile.list() triang.list()

Examples

Run this code
# Puts dummy points at the corners of the rectangular
# window, i.e. at (0,0), (10,0), (10,10), and (0,10)
# An "alerting note" is printed.
x    <- c(2.3,3.0,7.0,1.0,3.0,8.0)
y    <- c(2.3,3.0,2.0,5.0,8.0,9.0)
tv   <- deldir(x,y,list(ndx=2,ndy=2),c(0,10,0,10))

# Plots the triangulation which was created (but not the tesselation).
tv   <- deldir(x,y,list(ndx=2,ndy=2),c(0,10,0,10),plot=TRUE,wl='tr')

# Auxiliary values associated with points; 4 dummy points to be
# added so 4 dummy "z-values" provided.
z    <- sample(1:100,6)
zdum <- rep(-99,4)
tv   <- deldir(x,y,list(ndx=2,ndy=2),c(0,10,0,10),z=z,zdum=zdum)

Run the code above in your browser using DataCamp Workspace