as.hyperframe.ppx {spatstat.geom} | R Documentation |
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 class 'ppx'
as.hyperframe(x, ...)
## S3 method for class 'ppx'
as.data.frame(x, ...)
## S3 method for class 'ppx'
as.matrix(x, ...)
Arguments
x |
A general multidimensional space-time point pattern
(object of class |
... |
Ignored. |
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.
Value
A hyperframe
, data.frame
or matrix
as appropriate.
Author(s)
Adrian Baddeley Adrian.Baddeley@curtin.edu.au
and Rolf Turner rolfturner@posteo.net
See Also
ppx
,
hyperframe
,
as.hyperframe
.
Examples
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)