Mercurial > octave

comparison scripts/sparse/colperm.m @ 23084:ef4d915df748

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Merge stable to default.
author John W. Eaton <jwe@octave.org>
date Mon, 23 Jan 2017 14:27:48 -0500
parents 3a2b891d0b33 e9a0469dedd9
children 092078913d54
comparison
equal deleted inserted replaced
23081:7485462a6924 23084:ef4d915df748
36 [i, j] = find (s); 36 [i, j] = find (s);
37 idx = find (diff ([j; Inf]) != 0); 37 idx = find (diff ([j; Inf]) != 0);
38 [~, p] = sort (idx - [0; idx(1:(end-1))]); 38 [~, p] = sort (idx - [0; idx(1:(end-1))]);
39 39
40 endfunction 40 endfunction
41