Clustering | Index << >> |
cluster ← {((1,2≠/s)/s←⍵[⍋⍵]) ⍸ ⍵} x←?7⍴10 ⋄ y←?11⍴10 x, y 2 8 4 8 2 3 5 3 2 4 6 5 9 0 9 5 2 4 cluster x,y 1 6 3 6 1 2 4 2 1 3 5 4 7 0 7 4 1 3 {⊂⍵}⌸ cluster x,y ┌────────┬───┬──────┬───┬───────┬──┬─────┬──┐ │0 4 8 16│1 3│2 9 17│5 7│6 11 15│10│12 14│13│ └────────┴───┴──────┴───┴───────┴──┴─────┴──┘ |