diff scripts/statistics/distributions/gampdf.m @ 10549:95c3e38098bf

Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents a1dbe9d80eee
children 1740012184f9
line wrap: on
line diff
--- a/scripts/statistics/distributions/gampdf.m	Fri Apr 23 11:13:48 2010 -0700
+++ b/scripts/statistics/distributions/gampdf.m	Fri Apr 23 11:28:50 2010 -0700
@@ -52,10 +52,10 @@
   if (any (k))
     if (isscalar(a) && isscalar(b))
       pdf(k) = (x(k) .^ (a - 1)) ...
-		.* exp(- x(k) ./ b) ./ gamma (a) ./ (b .^ a);
+                .* exp(- x(k) ./ b) ./ gamma (a) ./ (b .^ a);
     else
       pdf(k) = (x(k) .^ (a(k) - 1)) ...
-		.* exp(- x(k) ./ b(k)) ./ gamma (a(k)) ./ (b(k) .^ a(k));
+                .* exp(- x(k) ./ b(k)) ./ gamma (a(k)) ./ (b(k) .^ a(k));
     endif
   endif
 
@@ -63,10 +63,10 @@
   if (any (k))
     if (isscalar(a) && isscalar(b))
       pdf(k) = exp (- a .* log (b) + (a-1) .* log (x(k))
-		    - x(k) ./ b - gammaln (a));
+                    - x(k) ./ b - gammaln (a));
     else
       pdf(k) = exp (- a(k) .* log (b(k)) + (a(k)-1) .* log (x(k))
-		    - x(k) ./ b(k) - gammaln (a(k)));
+                    - x(k) ./ b(k) - gammaln (a(k)));
     endif
   endif