Mercurial > hg > smallbox

annotate util/ksvd utils/iswhole.m @ 219:4337e28183f1 luisf_dev

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Modified help comments of wrapper_mm_DL.m, wrapper_mm_solver.m, SMALL_rlsdla.m & SMALL_AudioDenoise_DL_test_KSVDvsSPAMS.m. Moved wrapper_ALPS_toolbox from toolboxes to toolboxes/alps and added some extra help comments.
author Aris Gretsistas <aris.gretsistas@elec.qmul.ac.uk>
date Fri, 23 Mar 2012 20:48:25 +0000
parents c3eca463202d
children
rev   line source
idamnjanovic@70 1 function z = iswhole(x,epsilon)
idamnjanovic@70 2 %ISWHOLE Determine whole numbers with finite precision.
idamnjanovic@70 3 % Z = ISWHOLE(X,EPSILON) returns a matrix the same size as X, containing
idamnjanovic@70 4 % 1's where X is whole up to precision EPSILON, and 0's elsewhere.
idamnjanovic@70 5 %
idamnjanovic@70 6 % Z = ISWHOLE(X) uses the default value of EPSILON=1e-6.
idamnjanovic@70 7
idamnjanovic@70 8
idamnjanovic@70 9 % Ron Rubinstein
idamnjanovic@70 10 % Computer Science Department
idamnjanovic@70 11 % Technion, Haifa 32000 Israel
idamnjanovic@70 12 % ronrubin@cs
idamnjanovic@70 13 %
idamnjanovic@70 14 % May 2005
idamnjanovic@70 15
idamnjanovic@70 16 if (nargin<2), epsilon = 1e-6; end
idamnjanovic@70 17 z = abs(round(x)-x) < epsilon;