Mercurial > octave-nkf

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 16f53d29049f
children 1740012184f9
line wrap: on
line diff
--- a/scripts/statistics/distributions/tinv.m	Fri Apr 23 11:13:48 2010 -0700
+++ b/scripts/statistics/distributions/tinv.m	Fri Apr 23 11:28:50 2010 -0700
@@ -66,12 +66,12 @@
   if (any (k))
     if (isscalar (n))
       inv(k) = (sign (x(k) - 1/2)
-		.* sqrt (n .* (1 ./ betainv (2*min (x(k), 1 - x(k)),
-						 n/2, 1/2) - 1)));
+                .* sqrt (n .* (1 ./ betainv (2*min (x(k), 1 - x(k)),
+                                                 n/2, 1/2) - 1)));
     else
       inv(k) = (sign (x(k) - 1/2)
-		.* sqrt (n(k) .* (1 ./ betainv (2*min (x(k), 1 - x(k)),
-						 n(k)/2, 1/2) - 1)));
+                .* sqrt (n(k) .* (1 ./ betainv (2*min (x(k), 1 - x(k)),
+                                                 n(k)/2, 1/2) - 1)));
     endif
   endif