spatstat.geom (version 3.7-0)

affine.psp: Apply Affine Transformation To Line Segment Pattern

Description

Applies any affine transformation of the plane (linear transformation plus vector shift) to a line segment pattern.

Usage

# S3 method for psp
affine(X, mat=diag(c(1,1)), vec=c(0,0), ...)

Value

Another line segment pattern (of class "psp") representing the result of applying the affine transformation.

Details

The line segment pattern, and its window, are subjected first to the linear transformation represented by mat (multiplying on the left by mat), and are then translated by the vector vec.

The argument mat must be a nonsingular \(2 \times 2\) matrix.

This is a method for the generic function affine.

See Also

affine, affine.owin, affine.ppp, affine.im, flipxy, rotate, shift

Examples

  oldpar <- par(mfrow=c(2,1))
  X <- psp(runif(10), runif(10), runif(10), runif(10), window=owin())
  plot(X, main="original")
  # shear transformation
  Y <- affine(X, matrix(c(1,0,0.6,1),ncol=2))
  plot(Y, main="transformed")
  par(oldpar)
  # 
  # rescale y coordinates by factor 0.2
  affine(X, diag(c(1,0.2)))