Simulate Binomial Spatial Point Process

Syntax
	Psim(n)
Input
 n    number of points

Output
list of vectors of `x' and `y' coordinates.

Details
relies on the region being set by `ppinit' or `ppregion'.


uses the random number generator.

See also
`SSI', `Strauss'

Examples:
towns <- ppinit("towns.dat")
par(pty="s")
plot(Kfn(towns, 10), type="s", xlab="distance", ylab="L(t)")
for(i in 1:10) lines(Kfn(Psim(69), 10))