HierStrauss(radii, types=NULL, archy=NULL)marks variable in the data)"interact"
  describing the interpoint interaction
  structure of the hierarchical Strauss process with
  interaction radii $radii[i,j]$.ppm(),
  which fits point process models to 
  point pattern data, requires an argument 
  of class "interact" describing the interpoint interaction
  structure of the model to be fitted. 
  The appropriate description of the hierarchical
  Strauss process pairwise interaction is
  yielded by the function HierStrauss(). See the examples below.  The argument types need not be specified in normal use.
  It will be determined automatically from the point pattern data set
  to which the HierStrauss interaction is applied,
  when the user calls ppm. 
  However, the user should be confident that
  the ordering of types in the dataset corresponds to the ordering of
  rows and columns in the matrix radii.
  The argument archy can be used to specify a hierarchical
  ordering of the types. It can be either a vector of integers
  or a character vector matching the possible types.
  The default is the sequence
  $1,2, \ldots, m$ meaning that type $j$
  depends on types $1,2, \ldots, j-1$.
  
  The matrix radii must be symmetric, with entries
  which are either positive numbers or NA. 
  A value of NA indicates that no interaction term should be included
  for this combination of types.
  
  Note that only the interaction radii are
  specified in HierStrauss.  The canonical
  parameters $\log(\beta_j)$ and
  $\log(\gamma_{ij})$ are estimated by
  ppm(), not fixed in HierStrauss().
  
MultiStrauss for the corresponding
  symmetrical interaction.r <- matrix(10 * c(3,4,4,3), nrow=2,ncol=2)
   HierStrauss(r)
   # prints a sensible description of itself
   ppm(ants ~1, HierStrauss(r, , c("Messor", "Cataglyphis")))
   # fit the stationary hierarchical Strauss process to ants dataRun the code above in your browser using DataLab