在MATLAB中调整图像大小

Question

我正在尝试创建一个函数,根据作业作业的值(scale_zoom)缩放图像.我不想resize()在这个函数中使用MATLAB内置函数,所以我试图插值.任何帮助将不胜感激.这是我到目前为止:

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

我想我插错不正确:/

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%