| Case Study | Index << >> |
hix←{
X←⍵
Z←(≢⍵)⍴¯1
c←{⊂⍵}⌸ ⍺⍺ ⍵
Z ⊣ {0 ⊣ Z[⍵]←⍵[xix X⌷⍨⊂⍵]}¨ c
}
hf←{3⊥⎕av⍳⍵}
x← ⍕¨ ?1e3⍴1e5
cmpx 'xix x' 'hf¨ hix x'
xix x → 3.36E¯4 | 0% ⎕⎕⎕
hf¨ hix x → 3.59E¯3 | +968% ⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕⎕
⎕←t←{x∘←⍕¨?⍵⍴1e5 ⋄ 1 1 cmpx 'hf¨ hix x'}¨ 1e3×1 2 4 8 16
0.00353516 0.00584766 0.009875 0.0158438 0.0260781
2 ÷⍨/ t
1.65414 1.68871 1.60443 1.64596
|