Mercurial > hg > ltpda
comparison m-toolbox/classes/@specwin/kaiser_nenbw.m @ 0:f0afece42f48
Import.
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 23 Nov 2011 19:22:13 +0100 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:f0afece42f48 |
---|---|
1 function nenbw = kaiser_nenbw(alpha) | |
2 | |
3 % KAISER_NENBW returns the normalized noise-equivalent bandwidth for a | |
4 % kaiser window with parameter alpha. | |
5 % | |
6 % Take from C code of Gerhard Heinzel: | |
7 % | |
8 % Compute the 'normalized noise-equivalent bandwidth' | |
9 % (NENBW) [bins] of Kaiser windows from the parameter alpha. | |
10 % Best-fit polynomial was obtained from 180 data | |
11 % points between alpha=1 and alpha=9.95. | |
12 % Maximum error is 0.007 bins | |
13 % NOTE that NENBW can be computed precisely | |
14 % from the actual time-domain window values | |
15 % | |
16 % M Hewitson 19-05-07 | |
17 % | |
18 % $Id: kaiser_nenbw.m,v 1.1 2008/06/20 10:46:54 hewitson Exp $ | |
19 % | |
20 | |
21 a0 = 0.768049; | |
22 a1 = 0.411986; | |
23 a2 = -0.0264817; | |
24 a3 = 0.000962211; | |
25 x = alpha; | |
26 nenbw = (((((a3 * x) + a2) * x) + a1) * x + a0); | |
27 | |
28 % END |