Sorting algorithms/Counting sort: Difference between revisions
Content added Content deleted
(add Ruby) |
(+ AutoHotkey) |
||
Line 77: | Line 77: | ||
0 1 2 3 3 4 4 5 6 7 8 9 9 10 11 12 15 18 18 19 21 21 22 27 33 35 36 38 38 38 38 39 40 40 41 43 44 53 54 55 57 57 58 59 59 60 60 60 60 61 62 64 65 66 67 68 70 71 78 79 82 83 84 84 87 87 88 88 88 89 89 92 93 93 97 98 99 99 100 107 109 114 115 115 118 122 126 127 127 129 129 130 131 133 134 136 136 137 139 139 |
0 1 2 3 3 4 4 5 6 7 8 9 9 10 11 12 15 18 18 19 21 21 22 27 33 35 36 38 38 38 38 39 40 40 41 43 44 53 54 55 57 57 58 59 59 60 60 60 60 61 62 64 65 66 67 68 70 71 78 79 82 83 84 84 87 87 88 88 88 89 89 92 93 93 97 98 99 99 100 107 109 114 115 115 118 122 126 127 127 129 129 130 131 133 134 136 136 137 139 139 |
||
=={{header|AutoHotkey}}== |
|||
contributed by Laszlo on the ahk [http://www.autohotkey.com/forum/post-276465.html#276465 forum] |
|||
<lang AutoHotkey> |
|||
MsgBox % CountingSort("-1,1,1,0,-1",-1,1) |
|||
CountingSort(ints,min,max) { |
|||
Loop % max-min+1 |
|||
i := A_Index-1, a%i% := 0 |
|||
Loop Parse, ints, `, %A_Space%%A_Tab% |
|||
i := A_LoopField-min, a%i%++ |
|||
Loop % max-min+1 { |
|||
i := A_Index-1, v := i+min |
|||
Loop % a%i% |
|||
t .= "," v |
|||
} |
|||
Return SubStr(t,2) |
|||
}</lang> |
|||
=={{header|C}}== |
=={{header|C}}== |