polyCub (version 0.3-1)

plotpolyf: Plot Polygonal Domain on an Image of a Bivariate Function

Description

Produces a combined plot of a polygonal domain and an image of a bivariate function, using either lattice::levelplot or image.

Usage

plotpolyf(polyregion, f, ..., npixel = 100, cuts = 15,
    col = rev(heat.colors(cuts + 1)), lwd = 3, xlim = NULL,
    ylim = NULL, use.lattice = TRUE)

Arguments

npixel

numeric vector of length 1 or 2 setting the number of pixels in each dimension.

cuts

number of cut points in the $z$ dimension. The range of function values will be divided into cuts+1 levels.

col

colour vector used for the function levels.

lwd

line width of the polygon edges.

xlim,ylim

numeric vectors of length 2 setting the axis limits. NULL means using the bounding box of polyregion.

use.lattice

logical indicating if lattice graphics (levelplot) should be used.

polyregion

a polygonal integration domain. The following classes are supported: "owin", "gpc.poly", "SpatialPolygon

f

two-dimensional function. As its first argument it must take a coordinate matrix, i.e. a numeric matrix with two columns.

...

further arguments for f.

Examples

### a polygonal domain
polycenter <- c(3,2)
mypoly <- discpoly(center=polycenter, radius=5, npoly=5)

### f: isotropic exponential decay
fr <- function(r, rate=1) dexp(r, rate=rate)
fcenter <- c(1,5)
f <- function (s, rate=1) fr(sqrt(rowSums(t(t(s)-fcenter)^2)), rate=rate)

### plot
plotpolyf(mypoly, f)