www.gusucode.com > IPCV_Eval_Kit_R2019a_0ce6858工具箱源码程序matlab > IPCV_Eval_Kit_R2019a_0ce6858/code/demo_files/I2_05_3_tr_custom.m
clear all; close all; clc; %% 僇僗僞儉曄姺僼僅乕儉偵傛傞婔壗妛揑曄姺 % p2c.m 偲 c2p.m 傪巊梡 %% 夋憸偺擖椡偲昞帵 load topo I = topo(1:90,:); figure imagesc(I(end:-1:1,:),'CDataMapping','scaled'); colormap(topomap1) %% 僇僗僞儉曄姺僼僅乕儉偺嶌惉 T = maketform('custom',2,2,@p2c,@c2p,[]); udata = [-pi pi]; % 擖椡夋憸偵懳偡傞X幉偺斖埻 vdata = [0 90]; % 擖椡夋憸偵懳偡傞Y幉偺斖埻 xdata = [-90 90]; % 弌椡夋憸偵懳偡傞X幉偺斖埻 ydata = [-90 90]; % 弌椡夋憸偵懳偡傞Y幉偺斖埻 %% 婔壗妛揑曄姺\帵 b = imtransform(I,T,'cubic','UData',udata,... 'VData',vdata,'XData',xdata,'YData',ydata,... 'Size',[180 180],'FillValues',0); figure imagesc(b,'CDataMapping','scaled'); colormap(topomap1) %% % Copyright 2014 The MathWorks, Inc.