1.3 (예) 마우스로 좌표를 입력 받아 spline곡선 그리기

% file name : g_spline : ginput함수와 spline함수를 사용하여 interpolation하는 곡선을 그린다.
clear all
clf

v=[0 50 0 50];
axis(v);

hold on;

x=[];
y=[];
n=0;
button=1;

title('Drawing smooth curve');
xlabel('x');
ylabel('y');

while button==1
   [xi,yi,button]=ginput(1);               %마우스로 클릭한 좌표를 받는다.
   plot(xi,yi,'ro');                       %마우스로 클릭한 좌표에 o를 찍는다.
   text(xi+(xi)/15,yi+(yi)/15,int2str(n+1));  %몇번째로 클릭한 것인지 숫자를
   n=n+1;                                     %카운트해서 찍는다.
   x(n,1)=xi;      %spline함수의 사용을 위해서 x벡터를 만든다.
   y(n,1)=yi;      %y벡터를 만든다.
end

t=1:n;
ts=1:0.1:n;
xs=spline(t,x,ts);     
ys=spline(t,y,ts);
plot(xs,ys,'b-');          %전체 점을 spline곡선으로 연결한다.
hold off

결과