ppinit(file)
file
| string giving file name |
the number of points a header (ignored) xl xu yl yu scale x y (repeated n times)
x, y, xl, xu, yl, yuppregion to set the domain.ppregion
towns <- ppinit("towns.dat")
par(pty="s")
plot(Kfn(towns, 10), type="b", xlab="distance", ylab="L(t)")