<testonly>op <- spatstat.options(npixel=10)</testonly>
A <- tess(xgrid=0:4, ygrid=0:3)
B <- A[c(1, 3, 7)]
E <- A[-1]
A[c(2, 5, 11)] <- NULL
<testonly>spatstat.options(op)</testonly>
Run the code above in your browser using DataCamp Workspace