levelplot(as.matrix(pottery_dist),">