diff options
Diffstat (limited to 'macros/goertzel.sci')
| -rw-r--r-- | macros/goertzel.sci | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/macros/goertzel.sci b/macros/goertzel.sci index bc0061c..9014bd5 100644 --- a/macros/goertzel.sci +++ b/macros/goertzel.sci @@ -33,6 +33,7 @@ function Y = goertzel(X,INDVEC,DIM) //Ankur Mallick //References //Goertzel, G. (January 1958), "An Algorithm for the Evaluation of Finite Trigonometric Series", American Mathematical Monthly 65 (1): 34–35, doi:10.2307/2310304 + funcprot(0); if(argn(2)<3|isempty(DIM)) DIM=find(size(X)>1,1); //First non-singleton dimension |