% testcoef(N,k)
function b = testcoef(N,K)

b = ones(N,1);

k = 1;
for m=1:N,
  b(m) = b(m)*k*(-1)^(m+1);
  k = K*k;
end;