Saya harus berhenti memikirkan nama-nama lemah

Tugas Anda adalah membuat sebanyak mungkin cuplikan (program yang memiliki built-in input dan output), fungsi atau program penuh sebanyak mungkin yang mengurutkan apa pun versi bilangan bulat array bahasa Anda dalam urutan menaik, tetapi untuk setiap program, Anda hanya diizinkan untuk menggunakan karakter dalam ASCII (atau halaman kode bahasa Anda, jika itu secara langsung ditentukan bukan ASCII) yang belum pernah digunakan dalam program sebelumnya.

Ini adalah contoh jawaban (program terpisah dipisahkan oleh baris baru):

Derp
ASdFGHJKLAAA
qwEEERtyRty

Dalam hal ini (bahasa fiksi), jawaban pertama saya adalah Derp, yang habis D, e, rdan p. Pada program kedua, saya tidak diperbolehkan menggunakan karakter itu lagi, tetapi saya dapat menggunakan kembali sebanyak mungkin karakter yang saya inginkan. Sama dengan program ketiga, dan seterusnya.

Setiap program harus mengambil array bilangan bulat, jadi sesuatu seperti ini (lihat contoh input / output untuk gaya input / output yang valid):

[3 4 -2 5 7 196 -44 -2]

Dan itu harus menampilkan item dalam array sebagai array, dalam urutan naik:

[-44 -2 -2 3 4 5 7 196]

Skor Anda akan menjadi jumlah total pengiriman. Jika ada seri, bytecount terendah (jumlah byte terkecil dalam kode Anda) menang!

Aturan untuk program:

• Semua kiriman harus berjalan dengan benar dalam satu versi bahasa (jadi Python 2 != Python 3).
• Kiriman Anda dapat berupa cuplikan, fungsi, atau program lengkap. Anda bahkan diizinkan untuk mencampur dan mencocokkannya - namun, Anda harus mengatakan yang mana, dan memberikan tautan ke kiriman yang berfungsi.
• Harap berikan tautan online ke semua solusi, jika memungkinkan.
• Semua kiriman harus menggunakan larik (atau string yang dibatasi dengan karakter apa pun) sebagai input, dan menghasilkan larik yang diurutkan (dalam bentuk larik bahasa Anda atau sebagai {any character}string yang -dimodifikasi).
• Anda tidak diperbolehkan menggunakan karakter apa pun di luar ASCII (atau halaman kode bahasa Anda).

Sebagai contoh, ini adalah input / output yang valid:

[1 2 3 4]    (Clojure style arrays)
[1, 2, 3, 4] (Python style arrays)
1 2 3 4 5    (Space-delimited - separated by spaces)
1#2#3#4#5    ("#"-delimited - separated by "#" characters)
1\n2\n3\n4\n (newline-delimited)

Spesifikasi untuk input:

• Anda dijamin bahwa array hanya berisi bilangan bulat. Namun, mungkin ada angka negatif, dan angka dapat berulang tanpa batas.

Jelly , 10 program, 65 byte

Ṣ
¹Þ
Ụị
Œ!Ṃ
7778Ọv
Ẋ>2\S$¿
ĠFḣṪ¥@€
~Ṁ~rṀxLœ&
C»/ð+ÆNPÆfÆC_ḷ
<þḅ1‘WiþJḄ³ṫZḢ

Ada beberapa tumpang tindih yang tak terhindarkan dengan jawaban @ Lynn's Jelly . Kredit untuk ide bogosort pergi padanya.

Cobalah online! atau memverifikasi keunikan .

Bagaimana mereka bekerja

Ṣ               Main link. Argument: A (array)

Ṣ               Sort A.

¹Þ              Main link. Argument: A (array)

¹Þ              Sort A, using the identity function as the key.

Ụị              Main link. Argument: A (array)

Ụ               Grade up; yield all indices of A, sorted by their corr. values.
 ị              Index into A.

Œ!Ṃ             Main link. Argument: A (array)

Œ!              Yield all permutations of A.
  Ṃ             Minimum; yield the lexicographically smallest permutation.

7778Ọv          Main link. Argument: A (array)

7778Ọ           Unordinal; yield chr(7778) = 'Ṣ'.
     v          Evaluate with argument A.

Ẋ>2\S$¿         Main link. Argument: A (array)

      ¿         While the condition it truthy, execute the body.
 >2\S$            Condition:
     $              Combine the two links to the left into a monadic chain.
 >2\                  Perform pairwise greater-than comparison.
    S                 Sum; add the results.
                    This returns 0 iff A contains an unsorted pair of integers.
Ẋ                 Body: Shuffle A.

ĠFḣṪ¥@€         Main link. Argument: A (array)

Ġ               Group the indices of A by their sorted values.
 F              Flatten the result.
      €         Apply the link to the left to each index in the previous result, 
                calling it with the index as left argument and A as the right one.
    ¥@            Combine the two links to the left into a dyadic chain and swap
                  its arguments, so A is left one and the index i is the right one.
  ḣ               Head; take the first i elements of A.
   Ṫ              Tail; yield the last of the first i, i.e., the i-th element of A.

~Ṁ~rṀxLœ&       Main link. Argument: A (array)

~               Take the bitwise NOT of all integers in A.
 Ṁ              Take the maximum.
  ~             Take the bitwise NOT of the maximum, yielding the minimum of A.
    Ṁ           Yield the maximum of A.
   r            Range; yield [min(A), ... max(A)].
      L         Yield the length of A.
     x          Repeat each integer in the range len(A) times.
       œ&       Take the multiset-intersection of the result and A.

C»/ð+ÆNPÆfÆC_ḷ  Main link. Argument: A (array)

C               Complement; map (x -> 1-x) over A.
 »/             Reduce by dyadic maximum, yielding 1-min(A).
   ð            Begin a new, dyadic chain. Arguments: 1-min(A), A
    +           Add 1-min(A) to all elements of A, making them strictly positive.
     ÆN         For each element n of the result, yield the n-th prime number.
       P        Take the product.
        Æf      Factorize the product into prime numbers, with repetition.
          ÆC    Prime count; count the number of primes less than or equal to p,
                for each prime p in the resulting factorization.
             ḷ  Yield the left argument, 1-min(A).
            _   Subtract 1-min(A) from each prime count in the result to the left.

<þḅ1‘WiþJḄ³ṫZḢ  Main link. Argument: A (array)

<þ              Construct the less-than matrix of all pairs of elements in A.
  ḅ1            Convert each row from base 1 to integer (sum each).
    ‘           Increment. The integer at index i now counts how many elements
                of A are less than or equal to the i-th.
     W          Wrap the resulting 1D array into an array.
        J       Yield the indices of A, i.e., [1, ..., len(A)].
      iþ        Construct the index table; for each array T in the singleton array
                to the left and index j to the right, find the index of j in T.
                This yields an array of singleton arrays.
         Ḅ      Unbinary; convert each singleton from base 2 to integer, mapping
                ([x]-> x) over the array.
          ³     Yield A.
           ṫ    Tail; for each integer i in the result of `Ḅ`, create a copy of A
                without its first i-1 elements.
            Z   Zip/transpose. The first column becomes the first row.
             Ḣ  Head; yield the first row.

Jelly, 8 program

Ṣ                   Built-in sort.
¹Þ                  Sort-by the identity function.
Ụị                  Sort indices by values, then index into list.
Œ!Ṃ                 Smallest permutation.
7778Ọv              Eval Unicode 7778 (Ṣ).
ẊI>@-.S$$¿          Bogosort.
<;0œṡ0⁸ṁjµ/         Insertion sort.
AṀ‘¶+Ç©ṬT_©®³ċЀ®x' A terrifying hack.

Program terakhir sangat menyebalkan ...

AṀ‘¶+Ç©               Add ® = abs(max(L)) + 1 to the entire list.
                      Now it’s offset to be entirely positive.
       Ṭ              Create a binary array with 1s at these indices.
        T             Find the indices of 1s in this array.
                      The result is sorted, but offset wrong, and lacks duplicates.
         _©®          Subtract the offset, saving this list to ®.
                      Now restore the duplicates:
            ³ċЀ      Count occurences in the original list.
                ®x'   Repeat the elements of ® that many times.

Jika saya dapat menghapus œṡdari <;0œṡ0⁸ṁjµ/, ada juga satu aneh ini: ²SNr²ZFœ&. Bantuan dihargai.

05AB1E , skor = 6

05AB1E menggunakan pengkodean CP-1252 .

Terima kasih kepada Kevin Cruijssen untuk program 4.
Terima kasih kepada Riley untuk inspirasi untuk program 6.

Program 1

{               # sort          

Cobalah online!

Program 2

`[Ž.^]¯

`               # flatten input list to stack
 [Ž  ]          # loop until stack is empty
   .^           # add top of stack to global list in sorted order
      ¯         # push global list

Cobalah online!

Program 3

WrZŠŠŸvy†

Wr              # get minimum value in input list and reverse stack
  ZŠ            # get maximum value in input list and swap move it to bottom of stack
    Š           # move input down 2 levels of the stack
     Ÿ          # create a range from max to min
      v         # for each y in range
       y†       # move any occurrence of it in the input list to the front

Cobalah online!

Program 4

ϧ

œ               # get a list of all permutations of input
 ß              # pop the smallest

Cobalah online!

Program 5

êDgFDNè¹sUXQOFXs}}\)

ê                      # sort with duplicates removed
 Dg                    # duplicate and get length
   F                   # for N in [0 ... len-1] do
    DNè                # duplicate and get the Nth element in the unique list
       ¹s              # push input and move the Nth element to top of stack
         UX            # save it in X
           Q           # compare each element in the list against the Nth unique element
            O          # sum
             FXs}      # that many times, push X and swap it down 1 level on stack
                 }     # end outer loop
                  \    # remove the left over list of unique items
                   )   # wrap stack in a list

Cobalah online!

Program 6

©€Ý逤þ((®€Ý逤(þ(Rì

©                        # store a copy of input in register
 €Ý                      # map range[0 ... n] over list
   é                     # sort by length
    €¤                   # map get_last_element over list
      þ((                # keep only non-negative numbers
                         # now we have all positive numbers sorted
         ®€Ý逤(þ(       # do the same thing again on input 
                         # except now we only keep negative numbers
                  R      # reverse sorting for negative numbers
                   ì     # prepend the sorted negative numbers to the positive ones

Cobalah online!

Brachylog , skor =  4  5

Program 1 - Sortir acak

ṣ.↔: 1≥₎∧ | ↰

Kami mengocok dan memastikan bahwa kebalikan dari daftar tidak bertambah. Jika tidak kita coba lagi secara rekursif.

Program 2 - Jenis permutasi

p≤₁

Output permutasi pertama yang tidak menurun.

Program 3 - Built-in

Hai

Memesan.

Program 4 - Built-in

≜ᵒ

Pesan dengan label. Karena bilangan bulat dalam daftar sudah diperbaiki, ini melakukan hal yang sama seperti o.

Program 5 - Pencetakan min

g ~ kKt ~ lg ~ kK {⌋M & ~ cṪ↺Th [M] hẉTb↺c} ⁱ⁾

Berikut penjelasan untuk keburukan Alam ini:

g~kK                                K = [Input list, a variable]
    t~lg~kK                         That variable is the length of the Input list
           {                  }ⁱ⁾   Iterate length-of-the-Input times on the Input:
            ⌋M                        M is the min of the input
              &~cṪ                    Ṫ is a triplet of lists which concatenate to the input
                 Ṫ↺Th[M]              T is Ṫ cyclically permuted once ccw; [M] is
                                        the first element of T
                        hẉ            Write M followed by a new line
                          Tb↺c        Remove the first element of T (i.e. [M]), cyclically
                                        pemute T once ccw and concatenate; this is
                                        the input for the next iteration

JavaScript, skor 1 2

Menggandakan skor berkat @ETHproductions yang mengingatkan saya pada string yang lolos

Cuplikan 1 (21 byte, karakter \ ,-.=>289`Facehilnorstux)

Function`return this.sort\x28\x28t,h\x29=>t-h\x29`.call

Cuplikan 2 (9117 byte, karakter (+)[!])

[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(![]+[])[!+[]+!+[]]][([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]]((!![]+[])[+!+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+([][[]]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+!+[]]+(+[![]]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+!+[]]]+(!![]+[])[+[]]+(+(+!+[]+[+[]]+[+!+[]]))[(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(+![]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(+![]+[![]]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]](!+[]+!+[]+[+!+[]])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]+!+[]]+(+(+!+[]+[+!+[]]+(!![]+[])[!+[]+!+[]+!+[]]+[!+[]+!+[]]+[+[]])+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]+(!![]+[])[+[]]+(![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]+(![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]+(![]+[])[+!+[]]+[[]][([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(![]+[])[+!+[]]+(!![]+[])[+[]]]([[]])+[]+(+(+!+[]+[+!+[]]))[(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(+![]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(+![]+[![]]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]](!+[]+!+[]+[+[]])+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]+([]+[])[(![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(!![]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]]()[+!+[]+[+!+[]]]+([]+[])[([![]]+[][[]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(![]+[])[+!+[]]+(![]+[])[!+[]+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(![]+[])[!+[]+!+[]+!+[]]]()[!+[]+!+[]]+(![]+[])[+!+[]]+(+((+(+!+[]+[+!+[]]+(!![]+[])[!+[]+!+[]+!+[]]+[!+[]+!+[]]+[+[]])+[])[+!+[]]+[+[]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+!+[]]])+[])[!+[]+!+[]]+(+(+!+[]+[+!+[]]))[(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(+![]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(+![]+[![]]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]](!+[]+!+[]+[+[]])+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(![]+[])[+!+[]]+(![]+[])[!+[]+!+[]]+(![]+[])[!+[]+!+[]]]

Anda dapat menguji kedua versi di konsol browser Anda. Versi pertama hanya fungsi, versi kedua adalah potongan yang membutuhkan tanda kurung dan argumen ditambahkan.

Contohnya

< {function snippet here}([1, -44, 65, -105, 12])
> [-105, -44, 1, 12, 65]

Bagaimana?

Cuplikan pertama memanggil metode pengurutan pada array yang Anda lewati. Secara default, metode sortir jenis lexicographical, yang buruk untuk bilangan bulat (terutama angka negatif multi-digit). Karena itu, kita harus meneruskannya dengan panggilan balik dalam bentuk fungsi panah yang mengambil dua elemen dan mengurangi yang terakhir dari yang sebelumnya. Bergantung pada nilai yang dihasilkan, kedua elemen disusun ulang: jika lebih kecil dari 0, aakan muncul sebelumnya b, jika lebih besar dari 0, aakan muncul setelah b, dan jika 0, kedua elemen akan berakhir bersebelahan.

Cuplikan kedua tidak lebih dari versi yang dikodekan dari cuplikan pertama dan mengambil keuntungan dari fakta bahwa dalam JavaScript, object.function()sama dengan object["function"](). Ini juga menggunakan array kosong, !operator dan casting nomor untuk menghasilkan semua jenis string, di mana karakter yang diperlukan untuk nama fungsi dapat ditemukan. Kemudian tanda kurung digunakan sekali lagi untuk mendapatkan karakter pada indeks tertentu dalam string, dan semua karakter tersebut digabungkan, menghasilkan kode JavaScript berikut:

[]["fill"]["constructor"]("return this.sort((a,b)=>a-b)")["call"]

[]["fill"]sama dengan [].fill, yang ["constructor"]merupakan Functionobjek. Kami kemudian memanggilnya dengan string (yang harus dievaluasi ketika fungsi dipanggil), yang merupakan fungsi pertama, tetapi perhatikan bahwa argumen telah diganti oleh this. Untuk mengatur nilai thisargumen, kita perlu memanggil fungsi pada fungsi ini, yaitu ["call"]. Dalam JavaScript konvensional, Anda akan menulis ini sebagai:

function _() {
    return this.sort((a,b)=>a-b);
}
_.call(argument);

V , skor 3 , 4

Ini adalah tantangan yang sangat menyenangkan! Untungnya, vim memiliki fungsi "sort" bawaan, jika tidak ini pada dasarnya tidak mungkin. Sayangnya, karena V / vim berbasis string maka perlu argumen untuk mengurutkan berdasarkan nilai numerik. Jadi saya menelepon

• Urutkan berdasarkan nilai numerik n,

• Urutkan berdasarkan nilai heksadesimal x, dan

• Urutkan berdasarkan nilai floating point f

Catatan kecil: Ketika saya menulis sesuatu seperti <esc>atau <C-r>, ini sebenarnya adalah byte tunggal. Ini mewakili karakter yang tidak diinginkan, dan karena V sayangnya sangat bergantung pada karakter yang tidak dicetak, metode ini membuat semuanya lebih mudah. TIO link memiliki -vbendera, yang membuat penerjemah V membaca ini seolah-olah mereka adalah karakter yang mereka wakili.

Program 1, 2 byte

ún

Cobalah online!

Ini memanggil fungsi sortir khusus V.

Program 2, 10 byte

Qsor x
vi

Ini hanya memanggil 'sortir' secara langsung. Satu-satunya hal yang menarik tentang ini adalah kita melakukannya dari exmode, yang merupakan mode aneh yang mengemulasi editor teks 'ex', kakek buyut buyut V. viadalah jalan pintas untuk visual, perintah yang digunakan untuk meninggalkan mode ex. Ini membutuhkan baris baru tambahan.

Cobalah online!

Program 3, 14 byte

OSOR X<esc>V~DJ:<C-r>"

Cobalah online!

Baiklah, disinilah penjelasannya mulai sedikit aneh. Jika kita dapat membangun teks sor x, kita dapat menghapusnya dan memasukkannya ke dalam perintah saat ini dengan <C-r><register-name>. Jadi kita akan memasukkannya huruf besar.

O                       " Open a newline above the current line, and enter insert mode
 SOR X                  " From insert mode, enter 'SOR X'
      <esc>             " Leave insert mode
           V            " Select this whole line
            ~           " And toggle the case of every selected character ('u' would also work here)
             D          " Delete this line (into register '"')
              J         " Get rid of a newline
               :        " Enter command-line mode
                <C-r>"  " Insert register '"'
                        " Implicitly hit enter, running the 'sor x' command
                        " Implicitly print the buffer

Program 4, 19 byte

YPC<C-v>58fbe a<C-c>g?_dd@1

Cobalah online!

Dan di sinilah penjelasannya menjadi sangat aneh. Mirip dengan terakhir kali, kami akan membangun perintah dalam mode normal sehingga kami dapat menggunakan kunci yang berbeda.

YP                          " Create a copy of this line up one line. This is mostly so that we have a line to work with without messing with the numbers.
  C                         " Delete this line and enter insert mode
   <C-v>58                  " Insert ASCII '58' (which is ':')
          fbe a             " Insert 'fbe a'
               <C-c>        " Pretty much equivalent to <esc>
                    g?_     " ROT13 this line. Now the line is ':sor n'
                       dd   " Delete this whole line
                         @1 " And run it as if typed

CJam, skor 4

Program 1: Built-in

$

Program 2: Built-in Eval'ed

36c~

36 adalah nilai ASCII dari $.

Program 3: Urutan Permutasi

e!0=

e!     e# Find unique permutations of the input
  0=   e# Take the first one, which happens to be in sorted order

Program 4: Nilai Min

[{__)\;\{_@_@<{\}&;}*^{1m<}{)\}?}h;]

Penjelasan tentang keburukan yang tidak wajar ini:

[             e# Begin working in an array
{             e# Do this block while the TOS is truthy (doesn't pop)
 __           e#  Duplicate TOS twice (the array)
 )\;          e#  Take the last element of the array
 \            e#  Swap top two elements, bringing the other array copy to the top
 {            e#  Reduce the array using this block
  _@_@<{\}&;  e#   The minimum of two values (e was already used, so can't use e<)
 }*           e#  (result is the minimum value from the array)
 ^            e#  Bitwise XOR of last element with minimum element;
              e#   if the numbers are the same, result is 0, otherwise non-zero
 {            e#  If non-zero (i.e. last element wasn't the minimum element)
  1m<         e#   Rotate the array 1 to the left
 }{           e#  Else
  )\          e#   Remove the last element and bring the array back to TOS
 }?           e#  (end if)
}h            e# (end do-while)
;             e# Remove the empty array left behind
]             e# End the array

Japt , skor = 4

Program 1

n

Cobalah online!

Program 2

ñ

Cobalah online!

Program 3

s)$.sort((a,b)=>a-b

Cobalah online!

Program 4

Ov85d +110d

Cobalah online!

Oktaf, 2 poin

Sulit untuk bersaing dengan esolang, tetapi begini:

Saya terkesan jika seseorang mengalahkan ini. uniquedapat digunakan untuk mengurutkan nilai, tetapi akan menghapus duplikat. Untuk memasukkan duplikat Anda perlu tanda kurung, dan mereka banyak digunakan dalam semacam gelembung. Anda juga perlu @, yang digunakan juga.

Nomor 1:

Yang ini cukup sederhana: Buat fungsi anonim, ditugaskan ke variabel ans.

@sort

Menyebutnya dengan cara ini: ans([-5, 3, 0, -2, 100]). Ini tidak berfungsi pada tio, tetapi bekerja pada oktaf online .

Nomor 2:

Ini hanyalah implementasi dari semacam gelembung, tanpa menggunakan karakter @sort. Kami tidak dapat menjadikan ini fungsi, karena o, dan kami tidak dapat menggunakannya inputkarena t. Karena itu kami terjebak eval.

eval(['a=inpu',116,'("");']);i=1;k=0;
while~k,k=1;i=1;while i<numel(a),if a(i)>a(i+1),a([i+1,i]) = a([i,i+1]);k=0;
end,i++;end,end,a

eval(['a=inpu',116,'("");']);mengevaluasi ke:, a=input("");yang dapat kita gunakan untuk memasukkan vektor input kami. Sisanya adalah pengurutan gelembung tanpa menggunakan foratau mod. Perhatikan bahwa ini harus disimpan dalam skrip dan dipanggil dari GUI / CLI. Anda tidak dapat menyalin-menempelkannya, karena input("")(ia akan menggunakan sisa kode sebagai input, sehingga gagal total).

Haskell (lambdabot), 3 fungsi

sort


vv v|vvv:vvvv<-v=vv vvvv|v==v=v
vvvv==:vvv|vvvv==vv vvvv=vvv:vvvv|v:vv<-vvvv,vvv<v=vvv:v:vv|v:vv<-vvvv=v:vv==:vvv
vv=:vvvv|v:vvv<-vvvv=vv==:v=:vvv
vv=:v=vv
v vvv=vv vvv=:vvv


fix(ap(min).ap((++).flip(map)[1].(.(0*)).(+).minimum).(.ap(\\)(flip(map)[1].(.(0*)).(+).minimum)))

Saya menggunakan lingkungan lambdabot untuk menghindari banyak importpernyataan. Bahkan sortkebutuhan import Data.List. lambdabot mengimpor banyak modul secara default. Selain yang hilang imports, itu kode Haskell standar sesuai aturan kami.

Cobalah online! .

Fungsi 1

sort

Fungsi perpustakaan dari Data.List. Tidak banyak yang bisa dikatakan di sini.

Fungsi 2

vv v|vvv:vvvv<-v=vv vvvv|v==v=v
vvvv==:vvv|vvvv==vv vvvv=vvv:vvvv|v:vv<-vvvv,vvv<v=vvv:v:vv|v:vv<-vvvv=v:vv==:vvv
vv=:vvvv|v:vvv<-vvvv=vv==:v=:vvv
vv=:v=vv
v vvv=vv vvv=:vvv

Fungsi vmengimplementasikan jenis-sisipan.

Saya menggunakan penjaga pola untuk menghindari ()parameter. Bandingkan vv v|vvv:vvvv<-v=...dengan vv(vvv:vvvv)=....

Baris pertama, fungsi vvadalah fungsi pembantu untuk membuat daftar kosong. Dengan itu saya tidak perlu menggunakan []untuk menulis daftar kosong literal. Lebih mudah dibaca:

mkEmpty list | hd:tl <- list = mkEmpty tl | otherwise = list

(==:)is insert, yang menyisipkan elemen ke dalam daftar yang diurutkan, sehingga daftar yang dihasilkan masih diurutkan. Lebih mudah dibaca:

list `insert` el
  | list == []           = el:list
  | hd:tl <- list, el<hd = el:hd:tl
  | hd:tl <- list        = hd : tl `insert` el

(=:)berkurang. Lebih mudah dibaca:

acc `reduce` list
  | hd:tl <- list = (acc `insert` hd) `reduce` tl
acc `reduce` list = acc

Dan akhirnya vyang mengurangi daftar input menatap dengan []:

sort list = [] `reduce` list

Fungsi 3

fix(ap(min).ap((++).flip(map)[1].(.(0*)).(+).minimum).(.ap(\\)(flip(map)[1].(.(0*)).(+).minimum)))

sortdari Fungsi 1 membuat sebagian besar fungsi daftar-kaki ( fold, scan, until) tidak tersedia. Kebutuhan rekursi =yang digunakan dalam Fungsi 2. Satu-satunya pilihan yang tersisa adalah menggunakan kombinator fixpoint fix. Saya sudah mulai dengan

fix (\f x -> min x ([minimum x]++f(x\\[minimum x])))

yang merupakan semacam seleksi. Mengubahnya menjadi point-free (saya tidak bisa menggunakan lambdas \f x ->..., karena -yang digunakan oleh gurad pola di Fungsi 2) memberikan:

fix (ap min . ap ((++) . return . minimum) . (. ap (\\) (return . minimum)))

Membuat daftar singleton dari nilai dengan returnadalah terlarang (sama untuk pure), jadi saya harus membangun fungsi saya sendiri: \x -> map (\y -> x+0*y) [1]atau bebas poin flip map[1].(.(0*)).(+). Mengganti returnhasil panen

fix(ap(min).ap((++).flip(map)[1].(.(0*)).(+).minimum).(.ap(\\)(flip(map)[1].(.(0*)).(+).minimum)))

MATL , 3 program

Program 1

S

Ini hanya menggunakan fungsi builtin, dengan input dan tampilan implisit.

Cobalah di MATL online .

Program 2

`GGnZrd0<a}3M

Ini terus menghasilkan permutasi acak dari input sampai semua perbedaan berturut-turut dari hasilnya adalah non-negatif (ini bogosort , seperti dicatat oleh @cz ). Waktu berjalan adalah non-deterministik dan rata-rata meningkat sangat cepat dengan ukuran input (yaitu, 𝒪 ( n! ) Untuk array size- n dengan semua entri berbeda).

Cobalah di MATL Online .

Program 3

t:"tt_X>_=&)]&h

Ini adalah loop yang menghitung minimum array, menghapus semua elemen yang sama dengan nilai itu, dan memproses sisanya. Ini dilakukan sebanyak ukuran input. Jika tidak semua entri dalam input berbeda, beberapa iterasi tidak akan berguna (tapi tidak berbahaya), karena array sudah dikosongkan.

Cobalah di MATL online .

Pip , 4 program

Program 1 - builtin

Potongan; mengasumsikan daftar di x.

SNx

( SNuntuk Sort Numeric)

Program 2 - permutasi filter

Potongan; mengasumsikan daftar di y. Sangat lambat untuk input yang lebih panjang dari sekitar 7 item.

Y$<=_FIPMyPOy

       PMy     List of permutations of y
     FI        Filter on this lambda function:
 $<=_           Fold on less-than-or-equal
                (gives 1 if the permutation is sorted ascending, 0 otherwise)
Y              Yank that result back into y
               Filter returned a list of (one or more) permutations, so we need to
          POy  Pop the first one

Program 3 - eval

Potongan; mengasumsikan daftar di z.

V J C[83 78 122]

    C[83 78 122]  Apply chr to each number; yields ["S" "N" "z"]
  J               Join that list into a string
V                 Eval

Program 4 - MergeSort

Fungsi anonim; panggilan dengan daftar sebagai argumen (suka ({...} [1 2])atau f:{...} (f [1 2]).

{b:#a>o?(fa@(,#a/2))lc:#a>o?(fa@(#a/2,()))aa:lWb{Wb@0>c@0|b@0Qc@0{aAE:c@0c@>:o}t:bb:cc:t}aALc}

Tidak Disatukan:

{
 ; If more than one element in a, b gets result of recursion with first half
 ; else b gets l (empty list)
 b: #a>o ? (f a@(,#a/2)) l
 ; If more than one element in a, c gets result of recursion with second half
 ; else c gets a
 c: #a>o ? (f a@(#a/2,())) a
 ; Now we merge b and c
 ; We'll put the results in a, which must be initialized to l (empty list)
 a:l
 ; Loop while b is nonempty
 W b {
  ; Loop while 0th element of c exists and is less than or equal to 0th element
  ; of b (note: Q is string equality)
  W b@0>c@0 | b@0Qc@0 {
   ; Append 0th element of c to a
   a AE: c@0
   ; Slice c from 1st element on and assign that back to c (removing 0th)
   c @>: o
  }
  ; Swap b and c
  t:b
  b:c
  c:t
 }
 ; When b is empty, we only need append the rest of c to a and return
 aALc
}

PowerShell , 2

|sort

Cobalah online!

Ini adalah cuplikan yang berjalan dalam (mis.) PowerShell setara dengan REPL. TIO Link menunjukkan penggunaan. Ini sortadalah alias untuk Sort-Objectcmdlet.

PARAM($A)[ARRAY]::SORT($A);$A

Cobalah online!

Perintah PowerShell tidak peka huruf besar-kecil, sehingga kita bisa menggunakan sortuntuk yang satu dan SORTyang lainnya. Ini mengambil larik input, mengurutkannya di tempat, dan lalu mengeluarkannya.

Ruby, 2 program

Pertama - langsung:

->t{t.sort}

Kedua - bagian yang sulit:

def w(g)
    eval ""<<103<<46<<115<<111<<114<<116
end

J

Program satu: 3 byte

/:~

seperti dalam /:~ 3,1,2,1output1 1 2 3

Cobalah online!

CATATAN dalam J, angka negatif diawali dengan _ tidak - sehingga Anda dapat mencoba 4, _10,56, _333 dll.

Program dua: 5 byte

|.\:~

PHP 7, 2 program

Kedua program ini bisa lebih banyak golf.

Program 1, 254 byte, karakter ! "$&+.01:;=>?[]adeginoprtv

$a=$argv;0 .$a[1+1]?$i=$n=$d=0:print$a[1]and die;g:$r=0 .$a[++$i+1];$i=!$r?1:$i;$n=!$r?$n+1:$n;$v=$i+1;$d=$v>$d?$v:$d;$n>$d?print$a[$d]and die:0;$e=$d>$n&&$a[$i]>$a[$v];$t=$a[$i];$a[$i]=$e?$a[$v]:$a[$i];$a[$v]=$e?$t:$a[$v];$n==$d?print"$a[$i] ":0;goto g;

Semacam gelembung. Penggunaangoto untuk membuat loop seperti yang dibutuhkan loop bawaan ().

Program 2, 155 byte, karakter #%'(),-67ACEFINORTUYZ^_{|}~

IF(CREATE_FUNCTION('','NEFTIEZIENAECCERCTZIENA~N~UEEFECTZIENAUERTEF~CFACTY~YRZIENAUE'^')))6()~(7)7~6-677|~(7)7%~#|~6)77|~(7)7|~77-)^))(-|~^~~~(7)7|~')()){}

IF(...){}menghindari penggunaan ;. Kode utama dikodekan dengan XOR, karena $telah digunakan dalam program sebelumnya. Kode:

global$argv;unset($argv[0]);sort($argv);echo join(' ',$argv);