Update occurrence_acq.R