Mercurial > hg > smallbox

view toolboxes/alps/ALPS/thresh.m @ 202:5bb579c9874e luisf_dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge
author bmailhe
date Tue, 20 Mar 2012 14:51:31 +0000
parents 0de08f68256b
children
line wrap: on
line source
function x= thresh(x, K)

[~, ind] = sort(abs(x), 'descend');
x(ind(K+1:end))= 0;