Last chance! 50% off unlimited learning
Sale ends in
X <- psp(runif(10),runif(10), runif(10), runif(10), window=owin())
plot(pixellate(X))
plot(X, add=TRUE)
sum(lengths.psp(X))
sum(pixellate(X))
Run the code above in your browser using DataLab