how can i solve problem in my code for adaptive median filter

function f= dd(r,Smax)
if (Smax <= 1) | (Smax/2 == round(Smax/2)) | (Smax ~= round(Smax))
   error('SMAX must be an odd integer > 1.')
end
[M, N] = size(r);

% Initial setup.
f = r;
f(:) = 0;
alreadyProcessed = false(size(r));

%Begin filtering.
for k = 3:2:Smax
   zmin = ordfilt2(r, 1, ones(k, k), 'symmetric');
   zmax = ordfilt2(r, k * k, ones(k, k), 'symmetric');
   zmed = medfilt2(r, [k k], 'symmetric');

     processUsingLevelB = (zmed > zmin) & (zmax > zmed) & ...
         ~alreadyProcessed; 
     zB = (r > zmin) & (zmax > r);
     outputZxy  = processUsingLevelB & zB;
     outputZmed = processUsingLevelB & ~zB;
     f(outputZxy) = r(outputZxy);
     f(outputZmed) = zmed(outputZmed);

     alreadyProcessed = alreadyProcessed | processUsingLevelB;
     if all(alreadyProcessed(:))
        break;
     end
  end

% Output zmed for any remaining unprocessed pixels. Note that this
% zmed was computed using a window of size Smax-by-Smax, which is
% the final value of k in the loop.
f(~alreadyProcessed) = zmed(~alreadyProcessed);

[Daleel Ahmed]

Error using ordfilt2
Expected input number 1, A, to be one of these types:

double, single, uint8, uint16, uint32, uint64, int8, int16, int32, int64, logical

Instead its type was char.

Answer 1

[Walter Roberson]

You appear to be attempting to pass in characters for the first input to your function, the one named "r" here. That input must be numeric for this code to work.

Answer 2

[Zeeshan Salam]

can u send me working of this algorithm and flowchart