matlab实现一个函数读取PPM和PGM图像的功能

以下是一个Matlab函数，它可以读取PPM和PGM图像并返回Matlab的图像格式：

function img = readPPMorPGM(filename)
% 读取PPM或PGM图像
% 输入参数：filename - 图像文件名
% 输出参数：img - Matlab图像格式

% 打开文件
fid = fopen(filename, 'r');
if fid == -1
    error('文件无法打开！');
end

% 读取文件头
header = fgets(fid);
if ~strcmp(header(1:2), 'P5') && ~strcmp(header(1:2), 'P6')
    error('不是PPM或PGM图像文件！');
end
dim = fscanf(fid, '%d %d', [1,2]);
maxval = fscanf(fid, '%d', 1);

% 读取数据
if strcmp(header(1:2), 'P5')
    % PGM图像
    data = fread(fid, [dim(1), dim(2)], 'uint8');
    img = data;
else
    % PPM图像
    data = fread(fid, [dim(1), dim(2)*3], 'uint8');
    img = zeros(dim(1), dim(2), 3, 'uint8');
    img(:,:,1) = data(:,1:3:end);
    img(:,:,2) = data(:,2:3:end);
    img(:,:,3) = data(:,3:3:end);
end

% 关闭文件
fclose(fid);
end

这个函数使用了Matlab的`fscanf`和`fread`函数来读取PPM和PGM图像文件。如果文件头不是以`P5`或`P6`开头，函数将抛出一个错误。如果文件成功打开并读取完成，函数将返回Matlab的图像格式。