Create DushoffDeterModel.R