Mercurial > hg > smallbox

annotate toolboxes/alps/ALPS/thresh.m @ 241:423de9f24d98 ver_2.0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
removed unnecessary files
author luisf <luis.figueira@eecs.qmul.ac.uk>
date Wed, 25 Apr 2012 15:05:38 +0100
parents 0de08f68256b
children
rev   line source
ivan@154 1 function x= thresh(x, K)
ivan@154 2
ivan@154 3 [~, ind] = sort(abs(x), 'descend');
ivan@154 4 x(ind(K+1:end))= 0;