feat: added (default) method Levenberg-Marquardt, test added

pyerrors/fits.py

@@ -140,7 +140,9 @@ def least_squares(x, y, func, priors=None, silent=False, **kwargs):
         can be used to choose an alternative method for the minimization of chisquare.
         The possible methods are the ones which can be used for scipy.optimize.minimize and
         migrad of iminuit. If no method is specified, Levenberg-Marquard is used.
-        Reliable alternatives are migrad (default for combined fit), Powell and Nelder-Mead.
+        Reliable alternatives are migrad, Powell and Nelder-Mead.
+    tol: float, optional
+        can only be used for combined fits and methods other than Levenberg-Marquard
     correlated_fit : bool
         If True, use the full inverse covariance matrix in the definition of the chisquare cost function.
         For details about how the covariance matrix is estimated see `pyerrors.obs.covariance`.
@@ -706,6 +708,9 @@ def _combined_fit(x, y, func, silent=False, **kwargs):
     x_all = np.concatenate([np.array(o) for o in x.values()])
     y_all = np.concatenate([np.array(o) for o in y.values()])
 
+    y_f = [o.value for o in y_all]
+    dy_f = [o.dvalue for o in y_all]
+
     if len(x_all.shape) > 2:
         raise Exception('Unknown format for x values')
 
@@ -740,10 +745,6 @@ def _combined_fit(x, y, func, silent=False, **kwargs):
     else:
         x0 = [0.1] * n_parms
 
-    output.method = kwargs.get('method', 'migrad')
-    if not silent:
-        print('Method:', output.method)
-
     def chisqfunc(p):
         chisq = 0.0
         for key in func.keys():
@@ -756,6 +757,11 @@ def _combined_fit(x, y, func, silent=False, **kwargs):
             chisq += anp.sum((y_f - model) @ C_inv @ (y_f - model))
         return chisq
 
+    output.method = kwargs.get('method', 'Levenberg-Marquardt')
+    if not silent:
+        print('Method:', output.method)
+
+    if output.method != 'Levenberg-Marquardt':
         if output.method == 'migrad':
             tolerance = 1e-4
             if 'tol' in kwargs:
@@ -770,13 +776,27 @@ def _combined_fit(x, y, func, silent=False, **kwargs):
             output.iterations = fit_result.nit
 
         chisquare = fit_result.fun
+
+    else:
+        def chisqfunc_residuals(p):
+            model = np.concatenate([np.array(func[key](p, np.asarray(x[key]))) for key in func.keys()])
+            chisq = ((y_f - model) / dy_f)
+            return chisq
+        if 'tol' in kwargs:
+            print('tol cannot be set for Levenberg-Marquardt')
+        fit_result = scipy.optimize.least_squares(chisqfunc_residuals, x0, method='lm', ftol=1e-15, gtol=1e-15, xtol=1e-15)
+
+        chisquare = np.sum(fit_result.fun ** 2)
+        assert np.isclose(chisquare, chisqfunc(fit_result.x), atol=1e-14)
+        output.iterations = fit_result.nfev
+
     output.message = fit_result.message
 
     if not fit_result.success:
         raise Exception('The minimization procedure did not converge.')
 
     if x_all.shape[-1] - n_parms > 0:
-        output.chisquare = chisqfunc(fit_result.x)
+        output.chisquare = chisquare
         output.dof = x_all.shape[-1] - n_parms
         output.chisquare_by_dof = output.chisquare / output.dof
         output.p_value = 1 - scipy.stats.chi2.cdf(output.chisquare, output.dof)
@@ -815,8 +835,6 @@ def _combined_fit(x, y, func, silent=False, **kwargs):
         return hat_vector
 
     fitp = fit_result.x
-    y_f = [o.value for o in y_all]
-    dy_f = [o.dvalue for o in y_all]
 
     if np.any(np.asarray(dy_f) <= 0.0):
         raise Exception('No y errors available, run the gamma method first.')
@@ -842,7 +860,7 @@ def _combined_fit(x, y, func, silent=False, **kwargs):
             A = W @ hat_vector  # hat_vector = 'jacobian(func)(fit_result.x, x)'
             P_phi = A @ np.linalg.pinv(A.T @ A) @ A.T
             expected_chisquare = np.trace((np.identity(x_all.shape[-1]) - P_phi) @ W @ cov @ W)
-            output.chisquare_by_expected_chisquare = chisquare / expected_chisquare
+            output.chisquare_by_expected_chisquare = output.chisquare / expected_chisquare
             if not silent:
                 print('chisquare/expected_chisquare:', output.chisquare_by_expected_chisquare)
 

tests/fits_test.py

@@ -625,6 +625,32 @@ def test_combined_fit_list_v_array():
         assert (res[0][1] - res[1][1]).is_zero(atol=1e-8)
 
 
+def test_combined_fit_vs_standard_fit():
+
+    x_const = {'a':[0, 1, 2, 3, 4, 5, 6, 7, 8, 9], 'b':np.arange(10, 20)}
+    y_const = {'a':[pe.Obs([np.random.normal(1, val, 1000)], ['ensemble1']) 
+                for val in [0.25, 0.3, 0.01, 0.2, 0.5, 1.3, 0.26, 0.4, 0.1, 1.0]],
+            'b':[pe.Obs([np.random.normal(1, val, 1000)], ['ensemble1'])
+                for val in [0.5, 1.12, 0.26, 0.25, 0.3, 0.01, 0.2, 1.0, 0.38, 0.1]]}
+    for key in y_const.keys():
+        [item.gamma_method() for item in y_const[key]]
+    y_const_ls = np.concatenate([np.array(o) for o in y_const.values()])
+    x_const_ls = np.arange(0, 20)
+
+    def func_const(a,x):
+        return  0 * x + a[0]
+
+    funcs_const = {"a": func_const,"b": func_const}
+    for method_kw in ['Levenberg-Marquardt', 'migrad', 'Powell', 'Nelder-Mead']:
+        res = []
+        res.append(pe.fits.least_squares(x_const, y_const, funcs_const, method = method_kw, expected_chisquare=True))
+        res.append(pe.fits.least_squares(x_const_ls, y_const_ls, func_const, method = method_kw, expected_chisquare=True))
+        [item.gamma_method for item in res]
+        assert np.isclose(0.0, (res[0].chisquare_by_dof - res[1].chisquare_by_dof), 1e-14, 1e-8)
+        assert np.isclose(0.0, (res[0].chisquare_by_expected_chisquare - res[1].chisquare_by_expected_chisquare), 1e-14, 1e-8)
+        assert np.isclose(0.0, (res[0].p_value - res[1].p_value), 1e-14, 1e-8)
+        assert (res[0][0] - res[1][0]).is_zero(atol=1e-8)
+
 def fit_general(x, y, func, silent=False, **kwargs):
     """Performs a non-linear fit to y = func(x) and returns a list of Obs corresponding to the fit parameters.