Update pois.rate.R