The dispersion loop_parameter() function now calls r1_setup() to handle R1 parameters correctly.
This allows the R1 parameter to be removed or added to the parameter list prior to looping over the
parameters of the model. The change is required to allow for the dynamic handling of R1 parameters.
