insert.m

来自「这是伯克里wavelet transforms一书中的例子的代码」· M 代码 · 共 19 行

function ar = insert(ls,dat,n)
%ar=insert(ar,en,n)
%This routine will insert the entry 'en', into the array 'ar' at 
%position 'n'. 
%
%Author: Ajit S. Bopardikar
%Copyright (c) 1998 by Addison Wesley Longman, Inc.
%

 len = length(ls); %length of the input
 
 if (n<=len)  %If the data needs to be inserted somewhere in the middle of the 
             %input list
   ar = [ls(1:n-1) dat ls(n:len)]; %insertion @ position n
 else        %If the data needs to be inserted somewhere after the end of the 
             %input list
   ar = ls;
   ar(n) = dat;
 end  %endif