sqrcfilter.m

simulation module for visual wireless sensor network

function [h] = SqRCFilter(N,Alpha,Tb,Fs)

H(1) = sqrt(RaisedCosineResponse(0,Alpha,Tb));
for k = 1:(N-1)/2,
   H(k+1) = sqrt(RaisedCosineResponse(k*Fs/N,Alpha,Tb));
   H(N-k+1) = H(k+1);
end
for n = -(N-1)/2:(N-1)/2
   h(n+((N-1)/2)+1) = H(0+1);
   for m = 1:(N-1)/2,
      h(n+((N-1)/2)+1) = h(n+((N-1)/2)+1) + 2*H(m+1)*cos(2*pi*m*n/N);
   end
end