#N canvas 663 46 632 642 10;
#X obj 19 44 tgl 15 0 empty empty empty 0 -6 0 8 -24198 -1 -1 0 1;
#X msg 234 48 4 2 # 1 1 1 -1 -1 -1 -1 1;
#X obj 111 228 display;
#X obj 43 258 display;
#X obj 234 86 #rotate;
#X obj 288 76 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 -1831 256;
#X obj 288 92 * 100;
#X obj 18 497 #out window;
#X obj 67 181 #t;
#X obj 110 207 #moment;
#X msg 41 105 240 320 1 #;
#X obj 41 124 #draw_polygon put (1 # 255);
#X obj 426 123 #pack;
#X obj 234 105 # +;
#X obj 456 107 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 -45 256;
#X obj 426 91 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 12 256;
#X obj 426 72 #pack;
#X obj 456 56 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 32 256;
#X obj 426 40 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 49 256;
#X obj 234 67 # *;
#X obj 245 143 # inv+;
#X obj 245 124 # +;
#X obj 426 174 #pack;
#X obj 456 158 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 149 256;
#X obj 426 142 nbx 5 14 -1e+37 1e+37 0 1 empty empty empty 0 -6 0 10
-241291 -1 -1 128 256;
#X obj 41 143 #draw_polygon put (1 # 255);
#X text 162 460 red filter;
#X text 121 105 draw rectangles;
#X text 238 31 rectangle polygon;
#X obj 42 206 #moment 2;
#X obj 269 192 #moment_polar;
#X obj 356 212 display;
#X obj 270 232 display;
#X obj 5 81 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1 -1
;
#X text 141 329 this is a fudge factor.;
#X obj 18 516 fps;
#X floatatom 18 535 5 0 0 0 - - -;
#X text 143 341 depending on what you want to do \,;
#X text 140 353 you set it to 2 \, 3 \, 4 \, whatever.;
#X obj 402 314 #outer + (9000 0);
#X obj 448 378 #transpose;
#X obj 20 80 t b b b;
#X obj 402 490 # + (120 160);
#X obj 63 322 #cast f;
#X obj 63 419 #inner \, seed (f #);
#X obj 402 352 #cast f;
#X obj 402 409 #inner \, seed (f #);
#X obj 402 457 #cast i;
#X obj 63 398 #swap;
#X obj 402 276 #for 0 160 1;
#X obj 63 379 # sqrt (f #);
#X obj 63 341 # * (f # 3);
#X obj 402 429 # / (f # 1000);
#X obj 402 333 # cos* 1000;
#X obj 402 295 # * 225;
#X obj 18 459 #inner (1 3 # 1 0 0);
#X obj 18 478 #draw_polygon + (0 255 255) (2 2 #);
#X obj 19 61 metro 20;
#X obj 18 164 #t;
#X obj 63 360 cv/#SVD;
#X obj 0 0 doc_h;
#X obj 3 559 doc_c 0..1;
#X obj 3 708 doc_i 2;
#X obj 3 818 doc_o 1;
#X obj 14 848 doc_oo 0;
#X obj 14 738 doc_ii 0;
#X obj 14 760 doc_ii 1;
#X obj 14 589 doc_cc 0;
#X obj 0 902 doc_f;
#X obj 0 902 doc_f;
#X obj 97 848 doc_m o0 grid;
#X obj 97 760 doc_m i1 grid;
#X obj 97 738 doc_m i0 grid;
#X obj 97 589 doc_m c0 float;
#X text 232 589 1: average index of the values in the grid \, weighted
by the values themselves.;
#X text 232 624 2: average square of index of the values in the grid
\, weighted by the values themselves. this can be used to compute a
variance (covariance) matrix \, which in turn can be fed to [#moment_polar]
to figure out the standard deviation and the direction of the standard
deviation.;
#X text 232 848 mode 1: a grid[2];
#X text 232 870 mode 2: a grid[2 \, 2];
#X text 232 738 greyscale image;
#X text 232 760 mode 2: alleged centroid (doesn't have to be the real
centroid \, but when it is \, the output will be the variance matrix
\; else it won't be a centred moment);
#X connect 0 0 57 0;
#X connect 1 0 19 0;
#X connect 4 0 13 0;
#X connect 5 0 6 0;
#X connect 6 0 4 1;
#X connect 7 0 35 0;
#X connect 8 0 29 0;
#X connect 8 1 9 0;
#X connect 9 0 2 0;
#X connect 9 0 29 1;
#X connect 9 0 42 1;
#X connect 10 0 11 0;
#X connect 11 0 25 0;
#X connect 12 0 13 1;
#X connect 13 0 21 0;
#X connect 13 0 20 0;
#X connect 14 0 12 1;
#X connect 15 0 12 0;
#X connect 16 0 19 1;
#X connect 17 0 16 1;
#X connect 18 0 16 0;
#X connect 19 0 4 0;
#X connect 20 0 25 2;
#X connect 21 0 11 2;
#X connect 22 0 21 1;
#X connect 22 0 20 1;
#X connect 23 0 22 1;
#X connect 24 0 22 0;
#X connect 25 0 58 0;
#X connect 29 0 3 0;
#X connect 29 0 30 0;
#X connect 29 0 43 0;
#X connect 30 0 32 0;
#X connect 30 1 31 0;
#X connect 33 0 41 0;
#X connect 35 0 36 0;
#X connect 39 0 53 0;
#X connect 40 0 46 1;
#X connect 41 0 49 0;
#X connect 41 1 10 0;
#X connect 41 2 1 0;
#X connect 42 0 56 2;
#X connect 43 0 51 0;
#X connect 44 0 40 0;
#X connect 45 0 46 0;
#X connect 46 0 52 0;
#X connect 47 0 42 0;
#X connect 48 0 44 0;
#X connect 48 1 44 1;
#X connect 49 0 54 0;
#X connect 50 0 48 0;
#X connect 51 0 59 0;
#X connect 52 0 47 0;
#X connect 53 0 45 0;
#X connect 54 0 39 0;
#X connect 55 0 56 0;
#X connect 56 0 7 0;
#X connect 57 0 41 0;
#X connect 58 0 55 0;
#X connect 58 1 8 0;
#X connect 59 0 50 0;
#X connect 59 1 48 1;
#X connect 70 1 76 0;
#X connect 70 1 77 0;
#X connect 71 1 79 0;
#X connect 72 1 78 0;
#X connect 73 1 74 0;
#X connect 73 1 75 0;