SD-VBS/common/toolbox/toolbox_basic/io/readpmm.m


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

function I=readpmm(name)
%
%   I=writepmm(name)
%
%     I is a mul-band image
%
  fid = fopen(name,'r');

  if (fid <0),
    error(sprintf('can not find file %s',name));
  end

  a = fscanf(fid,'%d',3);
  nr = a(1);nc = a(2);nb = a(3);


  I = fscanf(fid, '%f\n', nr*nc*nb);

  I = reshape(I,nc,nr,nb)';
  I = squeeze(I);

  fclose(fid);