X-Git-Url: http://gitweb.michael.orlitzky.com/?p=octave.git;a=blobdiff_plain;f=optimization%2Ftest_functions%2Fhimmelblau_gradient.m;fp=optimization%2Ftest_functions%2Fhimmelblau_gradient.m;h=b50e7b6265879d06677b64259ad2912bb88a8eef;hp=0000000000000000000000000000000000000000;hb=4cf95f960c61165130795e7b5197cfe6e2829692;hpb=336f1181f7f065a07ee58bd772a875f7f4b39247

diff --git a/optimization/test_functions/himmelblau_gradient.m b/optimization/test_functions/himmelblau_gradient.m
new file mode 100644
index 0000000..b50e7b6
--- /dev/null
+++ b/optimization/test_functions/himmelblau_gradient.m
@@ -0,0 +1,9 @@
+function g = himmelblau_gradient(x1,x2)
+  ##
+  ## The gradient of the Himmelblau function. See himmelblau.m for
+  ## more information.
+  ##
+  f_x1 = 4*(x1^2 + x2 - 11)*x1 + 2*x2^2 + 2*x1 - 14;
+  f_x2 = 4*(x2^2 + x1 - 7)*x2 + 2*x1^2 + 2*x2 - 22;
+  g = [f_x1; f_x2];
+end