diff functions/betaDivergencePerElement.m @ 0:b4e26b53072f tip

Initial commit.
author Holger Kirchhoff <holger.kirchhoff@eecs.qmul.ac.uk>
date Tue, 04 Dec 2012 13:57:15 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/functions/betaDivergencePerElement.m	Tue Dec 04 13:57:15 2012 +0000
@@ -0,0 +1,14 @@
+function betaDivPerElem = betaDivergencePerElement(x, y, beta)
+
+switch beta
+    case 0
+        betaDivPerElem = x./y - log(x./y) - 1;
+
+    case 1
+        betaDivPerElem = x .* log(x./y) + x - y;
+
+    otherwise
+        betaDivPerElem = (x.^beta) / (beta*(beta-1)) ...
+                         + (y.^beta) / beta ...
+                         - (x .* (y.^(beta-1))) / (beta-1);
+end
\ No newline at end of file