nls() in R: Missing value or an infinity produced when evaluating the model - I need to include -inf in my model

Question

I\'m trying to analyse a dataset, in which all of the values are negative (cannot be changed). I have the code here:

CE_money_loss <- nls(
   ChoseMoneyGam