在MATLAB中调整图像大小

Question

我正在尝试创建一个函数，该函数基于一个值（scale_zoom）对图像进行缩放，以完成作业任务。我不想在此函数中使用MATLAB内置的resize()函数，因此我正在尝试进行插值。非常感谢任何帮助。这是我目前拥有的：

function pic_new=scale_image(pic,scale_zoom)
    [row, col]=size(pic)
    ht_scale=size(pic,1)/scale_zoom*col
    wid_scale=size(pic,2)/scale_zoom*row

    size(ht_scale)
    size(wid_scale)
    x=(0:scale_zoom)*wid_scale
    y=(0:scale_zoom)*ht_scale
    length(x)
    length(y)
    %plotvals=0:0.1:scale_zoom (this is not necessary i think)
    newimg=interp1(pic,x,y,'cubic')
    image(newimg)
end

我觉得我对它的插值非常不正确 :/

- Nick

---

我猜你的意思是不想使用imresize，尽管你写了resize。因为我会用imresize来完成这个。 - Chris A.

Answer 1

我曾经回答过一个问题，关于使用最近邻插值来缩放图像，我在那里使用的大部分代码和解释也适用于这里。主要区别是最后的插值步骤。以下是如何编写您的函数，使用INTERP2并推广到任何类型的2-D灰度或3-D RGB图像：

function pic_new = scale_image(pic,scale_zoom)

  oldSize = size(pic);                               %# Old image size
  newSize = max(floor(scale_zoom.*oldSize(1:2)),1);  %# New image size
  newX = ((1:newSize(2))-0.5)./scale_zoom+0.5;  %# New image pixel X coordinates
  newY = ((1:newSize(1))-0.5)./scale_zoom+0.5;  %# New image pixel Y coordinates
  oldClass = class(pic);  %# Original image type
  pic = double(pic);      %# Convert image to double precision for interpolation

  if numel(oldSize) == 2  %# Interpolate grayscale image

    pic_new = interp2(pic,newX,newY(:),'cubic');

  else                    %# Interpolate RGB image

    pic_new = zeros([newSize 3]);  %# Initialize new image
    pic_new(:,:,1) = interp2(pic(:,:,1),newX,newY(:),'cubic');  %# Red plane
    pic_new(:,:,2) = interp2(pic(:,:,2),newX,newY(:),'cubic');  %# Green plane
    pic_new(:,:,3) = interp2(pic(:,:,3),newX,newY(:),'cubic');  %# Blue plane

  end

  pic_new = cast(pic_new,oldClass);  %# Convert back to original image type

end

您可以按照以下步骤进行测试：

img = imread('peppers.png');      %# Load the sample peppers image
newImage = scale_image(img,0.3);  %# Scale it to 30%

- gnovice