view yetilab/signal/test/test_signal.yeti @ 147:e16e42c55a20

Add autocorrelation
author Chris Cannam
date Sat, 27 Apr 2013 23:56:15 +0100
parents
children
line wrap: on
line source
module yetilab.signal.test.test_signal;

{ acf, acfNormalised, acfUnityNormalised } = load yetilab.signal.autocorrelation;

{ compare } = load yetilab.test.test;

[

"unnormalised": \(
    compare (acf 12 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
        [4,0,0, 3,0,0, 2,0,0, 1,0,0 ];
),

"normalised": \(
    compare (acfNormalised 9 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
        [4/12,0,0, 3/9,0,0, 2/6,0,0 ];
),

"normalisedUnity": \(
    compare (acfUnityNormalised 9 (array [1,0,0, 1,0,0, 1,0,0, 1,0,0]))
        [1,0,0, 1,0,0, 1,0,0 ];
),

] is hash<string, () -> boolean>;