changeset 18:6339e1a06aa9

slowmedcouple: sort in reverse
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Sat, 17 Jan 2015 19:53:06 -0500
parents 8e35dcdb8dec
children d9230d702fbf
files slowmedcouple.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/slowmedcouple.m
+++ b/slowmedcouple.m
@@ -8,7 +8,7 @@
 zminus = z(z <= 0)';
 zz = (zplus + zminus)./(zplus - zminus);
 zz(isnan(zz)) = 0;
-zzsort = sort(zz(:));
+zzsort = sort(zz(:), "descend");
 medc_idx = ceil(n2^2/2);
 mc = zzsort(medc_idx);
 printf("%.16g\n", mc);