Learn R Programming

spatstat.geom (version 3.3-2)

as.hyperframe.ppx: Extract coordinates and marks of multidimensional point pattern

Description

Given any kind of spatial or space-time point pattern, extract the coordinates and marks of the points.

Usage

# S3 method for ppx
as.hyperframe(x, ...)
# S3 method for ppx
as.data.frame(x, ...)
# S3 method for ppx
as.matrix(x, ...)

Value

A hyperframe, data.frame or matrix as appropriate.

Arguments

x

A general multidimensional space-time point pattern (object of class "ppx").

...

Ignored.

Author

Adrian Baddeley Adrian.Baddeley@curtin.edu.au

and Rolf Turner rolfturner@posteo.net

Details

An object of class "ppx" (see ppx) represents a marked point pattern in multidimensional space and/or time. There may be any number of spatial coordinates, any number of temporal coordinates, and any number of mark variables. The individual marks may be atomic (numeric values, factor values, etc) or objects of any kind.

The function as.hyperframe.ppx extracts the coordinates and the marks as a "hyperframe" (see hyperframe) with one row of data for each point in the pattern. This is a method for the generic function as.hyperframe.

The function as.data.frame.ppx discards those mark variables which are not atomic values, and extracts the coordinates and the remaining marks as a data.frame with one row of data for each point in the pattern. This is a method for the generic function as.data.frame.

Finally as.matrix(x) is equivalent to as.matrix(as.data.frame(x)) for an object of class "ppx". Be warned that, if there are any columns of non-numeric data (i.e. if there are mark variables that are factors), the result will be a matrix of character values.

See Also

ppx, hyperframe, as.hyperframe.

Examples

Run this code
   df <- data.frame(x=runif(4),y=runif(4),t=runif(4))
   X <- ppx(data=df, coord.type=c("s","s","t"))
   as.data.frame(X)

   # ppx with marks which are point patterns
   val <- runif(4, max=10)
   num <- sapply(val, rpois, n=1)
   E <- lapply(num, runifrect)
   hf <- hyperframe(t=val, e=as.listof(E))
   Z <- ppx(data=hf, domain=c(0,10))

   # convert ppx to a hyperframe
   as.hyperframe(Z)
   as.data.frame(Z)

Run the code above in your browser using DataLab