From 29bed0995cc5ef96798204dc54cdd4bda031d795 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Tue, 27 Nov 2007 23:38:33 +0000 Subject: - added single, double and triple exponential smoothing objects based on NIST alorgithms (the links are included in the patches). This was originally inspired by Fredrik Olofsson's f0.smooth and f0.smooth2, but I added triple exponential smoothing, and made them as Pd patches. svn path=/trunk/externals/mapping/; revision=9058 --- smooth_double.pd | 46 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) create mode 100644 smooth_double.pd (limited to 'smooth_double.pd') diff --git a/smooth_double.pd b/smooth_double.pd new file mode 100644 index 0000000..6c76d24 --- /dev/null +++ b/smooth_double.pd @@ -0,0 +1,46 @@ +#N canvas 860 490 765 388 10; +#X obj 61 6 inlet; +#X obj 300 6 inlet; +#X obj 300 60 purepd/float_argument \$1 0.15; +#X obj 311 33 loadbang; +#X obj 99 345 outlet; +#X text 135 220 St = a*Yt1+(1-a)*St1; +#X obj 61 51 trigger float bang; +#X obj 166 147 float; +#X text 202 147 St1; +#X obj 300 96 clip 0 1; +#X obj 257 312 pddp/pddplink http://www.itl.nist.gov/div898/handbook/pmc/section4/pmc433.htm +; +#X obj 215 345 outlet; +#X obj 490 6 inlet; +#X obj 501 33 loadbang; +#X obj 490 96 clip 0 1; +#X text 233 277 bt = y * (St - St1) + (1 - y) * bt1; +#X text 549 96 y; +#X text 359 96 a; +#X obj 216 259 expr $f4 * ($f1 - $f2) + (1 - $f4) * $f3; +#X obj 334 148 float; +#X text 372 147 bt1; +#X obj 490 60 purepd/float_argument \$2 0.3; +#X obj 99 201 expr $f4*$f1+(1-$f4) * ($f2 + $f3); +#X connect 0 0 6 0; +#X connect 1 0 2 0; +#X connect 2 0 9 0; +#X connect 3 0 2 0; +#X connect 6 0 22 0; +#X connect 6 1 7 0; +#X connect 6 1 19 0; +#X connect 7 0 18 1; +#X connect 7 0 22 1; +#X connect 9 0 22 3; +#X connect 12 0 21 0; +#X connect 13 0 21 0; +#X connect 14 0 18 3; +#X connect 18 0 19 1; +#X connect 18 0 11 0; +#X connect 19 0 18 2; +#X connect 19 0 22 2; +#X connect 21 0 14 0; +#X connect 22 0 4 0; +#X connect 22 0 7 1; +#X connect 22 0 18 0; -- cgit v1.2.1