# generate 20 occurrences for a pseudo-species
# centred on Yellowstone National Park (latitude-longitude)
# normally distributed with a standard deviation ~110 km
set.seed(2)
x <- rnorm(20, 110.5885, 2)
y <- rnorm(20, 44.4280, 1)
pts <- cbind(x,y)
rangeSize(pts)
Run the code above in your browser using DataLab