function y=upspl(x);
% 函數 Y = UPSPL(X) 對輸入的一維序列x進行上抽樣，即對序列x每個元素之間
% 插零，例如 x=[x1,x2,x3,x4],上抽樣后為 y=[x1,0,x2,0,x3,0,x4];

N=length(x);        % 讀取輸入序列長度
M=2*N-1;            % 輸出序列的長度是輸入序列長度的2倍再減一
for i=1:M           % 輸出序列的偶數位為0，奇數位按次序等于相應位置的輸入序列元素
    if mod(i,2)
        y(i)=x((i+1)/2);
    else
        y(i)=0;
    end
end