summary(cells) # plain vanilla point pattern
# multitype point pattern
woods <- lansing
woods <- woods[seq(1, npoints(woods), length=40)]
summary(woods) # tabulates frequencies of each mark
# numeric marks
trees <- longleaf
trees <- trees[seq(1, npoints(trees), length=40)]
summary(trees) # prints summary.default(marks(trees))
# weird polygonal window
summary(demopat) # describes it
Run the code above in your browser using DataLab