data(lansing)
hicks <- lansing[lansing$marks == "hickory", ]
## Not run:
# plot(hicks) # still a marked point pattern, but only 1 value of marks
# plot(unmark(hicks)) # unmarked
# ## End(Not run)
Run the code above in your browser using DataLab