Create occurrence_acq.R