Mercurial > hg > smallbox

view toolboxes/alps/ALPS/thresh.m @ 227:b50e2b6a9c37 luisf_dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from the default branch
author luisf <luis.figueira@eecs.qmul.ac.uk>
date Thu, 12 Apr 2012 14:06:27 +0100
parents 0de08f68256b
children
line wrap: on
line source
function x= thresh(x, K)

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