June 2018 Update
This commit is contained in:
parent
ba8067c3b7
commit
22f33d4004
5278 changed files with 84726 additions and 14379 deletions
|
|
@ -0,0 +1,13 @@
|
|||
mata
|
||||
function selection_sort(real vector a) {
|
||||
real scalar i, j, k, n
|
||||
n = length(a)
|
||||
for (i = 1; i < n; i++) {
|
||||
k = i
|
||||
for (j = i+1; j <= n; j++) {
|
||||
if (a[j] < a[k]) k = j
|
||||
}
|
||||
if (k != i) a[(i, k)] = a[(k, i)]
|
||||
}
|
||||
}
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue