zero inflated Poisson GLM in R

Question

my data frame is as follows:

> head(dataset_presence)
        Date  Int_Bk    ui_avg     ui_sd dcalls sep2 presence  ui_lag02
5  2016-01-12 -9044.3  1.1365