今日の課題は、リストlを取得し、ソートさlれた各連続要素がl現れる位置を与えるプログラムまたは関数を作成することです。

つまり、最小値のインデックスを出力し、次に2番目に小さい値のインデックスを出力します。

入力配列には正の整数のみが含まれ、少なくとも1つの要素が含まれると想定できます。

テストケース：

Input                  | Output (1-indexed)
[7, 4, 5]              | [2, 3, 1]
[1, 2, 3]              | [1, 2, 3]
[2, 6, 1, 9, 1, 2, 3]  | [3, 5, 1, 6, 7, 2, 4]
[4]                    | [1]

同じ値を持つ2つ以上の要素が表示される場合、それらのインデックスは最小から最大の順に並んで表示されます。

これはcode-golfで、最少バイトが勝ちます！

ゼリー、1バイト

Ụ

オンラインでお試しください！

Dyalog APL、1バイト

⍋

Dyalog APLには、これを行うための組み込みの演算子関数があります（これをクリアしてくれたZacharýに感謝します）。

例

⍋11 2 4 15
    2 3 1 4  
{⍵[⍋⍵]}11 4 2 15
    2 4 11 15

ここでは、ソートされたインデックスによってリストにインデックスを付け、リストを昇順で返します。

ハスケル、43 42バイト

1-インデックス付き：

import Data.List
map snd.sort.(`zip`[1..])

オンラインでお試しください！

-1 @ØrjanJohansenにバイトありがとう！

Python 2、56バイト

このソリューションは0インデックスです。これsorted()は、元のリストのコピーを作成するという事実を悪用します。

l=input()
for k in sorted(l):a=l.index(k);print a;l[a]=0

オンラインでお試しください！

Javascript（ES6）、39バイト

@powellesのおかげで-2バイト

これArray.prototype.sortは、安定しているブラウザでのみ機能します。

a=>[...a.keys()].sort((b,c)=>a[b]-a[c])

1インデックスバージョン（47バイト）：

a=>a.map((_,i)=>i+1).sort((b,c)=>a[b-1]-a[c-1])

サンプルコードスニペット：

f=
a=>[...a.keys()].sort((b,c)=>a[b]-a[c])
console.log("7,4,5 => "+f([7,4,5]))
console.log("1,2,3 => "+f([1,2,3]))
console.log("2,6,1,9,1,2,3 => "+f([2,6,1,9,1,2,3]))
console.log("4 -> "+f([4]))

Python 2、48バイト

lambda x:sorted(range(len(x)),key=x.__getitem__)

オンラインでお試しください！

Perl 6の、 27の  21バイト

*.pairs.sort(*.value)».key

試して

->\x{sort {x[$_]},^x}

試して

Pythonの答えに触発された

拡張：

->    # pointy block lambda
  \x  # declare sigilless parameter
{
  sort
    { x[$_] },  # sort by the value in ｢x｣ at the given position
    ^x          # Range up-to the number of elements in ｢x｣
}

Bash + coreutils、20

nl|sort -nk2|cut -f1

オンラインでお試しください。

Swift 4、82バイト

func f(l:[Int]){var l=l;for k in l.sorted(){let a=l.index(of:k)!;print(a);l[a]=0}}

テストスイート。

説明

Swift l.sorted()で、元の配列のソートされたコピーを作成します。リストでソートされた要素を経由して、元の配列内の各アイテムのインデックスを印刷した後、我々はループlet a=l.index(of:k)!;print(a)し、その後、アレイ内の正しいインデックスを維持するために、我々は割り当てl[a]に0それが私たちの通常の出力には影響を与えませんので、。

これは私のPythonソリューションの移植であるため、これは0から始まるインデックスであることに注意してください。あなたはそれが1、インデックス付きになりたい場合は、交換するprint(a)とprint(a+1)またはオンラインをお試しください！。

R、5バイト

これには組み込み関数があります。

order

ルビー、40バイト

->a{a.zip([*1..a.size]).sort.map &:last}

オンラインでお試しください！

MATL、2バイト

&S

オンラインでお試しください！

入力と出力は暗黙的です。

J、2バイト

/:

オンラインでお試しください！

ゼロベースのインデックス付け。

オクターブ、17バイト

@(i)[~,y]=sort(i)

オンラインでお試しください！

Octaveは、MATLABに似ていますが、インラインで割り当てられているため、Mathworks HQの従業員は頭痛の種になります。あなたが何を呼ぶかは関係ありませんがy、私の知る限り、そのダミー変数なしではできません。

俺の、3バイト

MYにもこの機能が組み込まれています！

⎕⍋↵

オンラインでお試しください！

どうやって？

入力を評価し、グレードアップしてから、改行で出力します。

ただし、⌶/でインデックスを設定します0x48。（-1またはのような奇妙な整数でもかまいません。2デフォルトはです1）。

Java 8、128 + 19 = 147バイト

Xcoder氏のソリューションに基づきます。0ベース。Lambdaは入力をanとして受け取り、Integer[]を返しますInteger[]。バイトカウントには、ラムダ式と必要なインポートが含まれます。

import java.util.*;

l->{Integer o[]=l.clone(),s[]=l.clone(),i=0;for(Arrays.sort(s);i<l.length;)l[o[i]=Arrays.asList(l).indexOf(s[i++])]=0;return o;}

オンラインで試す

ゴルフされていないラムダ

l -> {
    Integer
        o[] = l.clone(),
        s[] = l.clone(),
        i = 0
    ;
    for (Arrays.sort(s); i < l.length; )
        l[o[i] = Arrays.asList(l).indexOf(s[i++])] = 0;
    return o;
}

ノート

のInteger[]代わりにint[]を使用して、の使用を許可しArrays.asListます。これにはプリミティブバージョンはありません。IntegerはLong値が配列インデックスとして使用され、キャストが必要になるためです。

これは最終的に私の最高の手続き型よりも短くなりました List、クラス名とメソッド名のコストのために、ソリューション。

これは、主にストリームを収集するために必要な手荷物のために、入力をストリーミングし、（値、インデックス）ペアにマッピングし、値でソートし、インデックスにマッピングする試みも解決しました。

謝辞

• ネバイのおかげで-5バイト

Common Lisp、82バイト

(lambda(l)(loop as i in(sort(copy-seq l)'<)do(setf(elt l(print(position i l)))0)))

オンラインでお試しください！

Clojure、39バイト

#(map key(sort-by val(zipmap(range)%)))

CJam、12バイト

{ee{1=}$0f=}

オンラインでお試しください！

MATLAB / オクターブ、29バイト

[~,y]=sort(input(''));disp(y)

オンラインでお試しください！

JavaScript（ES6）、69バイト

0インデックス付き。最大65,536個の要素を含むリストで機能します。

a=>[...a=a.map((n,i)=>n<<16|i)].sort((a,b)=>a-b).map(n=>a.indexOf(n))

テストケース

let f =

a=>[...a=a.map((n,i)=>n<<16|i)].sort((a,b)=>a-b).map(n=>a.indexOf(n))

console.log(JSON.stringify(f([7, 4, 5])))
console.log(JSON.stringify(f([1, 2, 3])))
console.log(JSON.stringify(f([2, 6, 1, 9, 1, 2, 3])))
console.log(JSON.stringify(f([4])))

Python 3バイト

0インデックス付き。Bruce ForteのHaskellの回答とGBのRubyの回答に基づいています。

lambda l:list(zip(*sorted(zip(l,range(len(l))))))[1]

オンラインでお試しください！

ハスク、10 7バイト

これは私のHaskellの回答の直接ポートであり、1インデックスも付けられています：

m→O`z,N

オンラインでお試しください！

未ゴルフ/説明

Code        Description               Example
         -- implicit input            [2,6,1]
      N  -- natural numbers           [1,2,3,..]
   `z,   -- zip, but keep input left  [(2,1),(6,2),(1,3)]
  O      -- sort                      [(1,3),(2,1),(6,2)]
m→       -- keep only indices         [3,1,2]

Java（OpenJDK 8）、72バイト

l->l.stream().sorted().map(i->{int j=l.indexOf(i);l.set(j,0);return j;})

オンラインでお試しください！

を受け取り、結果を含むをList<Integer>返しますStream<Integer>。

最初のリストに基づいてStreamを取得し、ソートしてから、各番号をリスト内のインデックスにマッピングします。重複する要素に対応するために、リストの元の要素をに設定し0ます。

SmileBASIC、67バイト

DEF I(A)DIM B[0]FOR I=1TO LEN(A)PUSH B,I
NEXT
SORT A,B
RETURN B
END

非常に簡単で、1から（配列の長さ）の数字のリストを生成し、これを入力と同じ順序でソートするだけです。

パイソン3とnumpyの、38の 26バイト

Jo Kingのおかげで12バイト節約（関数に名前を付ける必要はありません）

import numpy
numpy.argsort

出力は0ベースです。

オンラインでお試しください！

05AB1E、4バイト

ā<Σè

オンラインでお試しください！

パリ/ GP、16バイト

a->vecsort(a,,1)

オンラインでお試しください！

PHP、54バイト

<?php function i($a){asort($a);return array_keys($a);}

オンラインでお試しください！

これはゼロインデックスです。単純に配列をソートし、キーを返します。

Tcl、21バイト

（0インデックス付き）

puts [lsort -indi $L]

オンラインでお試しください！