arr.occurs-help.pd

#N canvas 563 48 357 476 10;
#X floatatom 61 329 5 0 0 0 - - -;
#X floatatom 126 221 5 0 0 0 - - -;
#X text 169 221 <-- array size;
#X obj 88 161 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 88 179 random 3;
#X floatatom 88 220 5 0 0 0 - - -;
#X text 156 179 <-- populate array;
#X msg 51 53 -1;
#X msg 60 75 0;
#X msg 68 96 1;
#X text 111 71 <-- get number of occurances;
#X msg 77 126 4;
#X obj 126 265 print list;
#X obj 51 353 print occurs;
#X obj 88 200 - 1;
#X obj 51 242 arr.occurs 10;
#X text 51 392 1st creation argumant is array size;
#X text 44 19 number of time x occurs in an array;
#X floatatom 101 287 5 0 0 0 - - -;
#X floatatom 76 308 5 0 0 0 - - -;
#X text 111 308 <-- previous;
#X text 138 286 <-- current;
#X text 49 419 (c)2020 \, megrimm;
#X connect 1 0 15 2;
#X connect 3 0 4 0;
#X connect 4 0 14 0;
#X connect 5 0 15 1;
#X connect 7 0 15 0;
#X connect 8 0 15 0;
#X connect 9 0 15 0;
#X connect 11 0 15 0;
#X connect 14 0 5 0;
#X connect 15 0 0 0;
#X connect 15 0 13 0;
#X connect 15 1 19 0;
#X connect 15 2 18 0;
#X connect 15 3 12 0;