รับสายอักขระที่xส่งออกในการxเรียงลำดับตามลำดับของลักษณะที่ปรากฏในซอร์สโค้ดของคุณ

ตัวอย่าง

Source: ThisIs A Test
 Input: Is it a Test?
Output: TissI   etta?

Source: Harry - yer a wizard.
 Input: I'm a what?
Output: aa  wh'?Imt

Source: Mr. H. Potter, The Floor, Hut-on-the-Rock, The Sea
 Input: 
Output:

กฎระเบียบ

• มีช่องโหว่มาตรฐาน & กฎ i / o
• อินพุตและเอาต์พุตสามารถเป็นสตริงรายการอักขระหรือรายการไบต์
• หากมีการใช้อักขระหลายครั้งในซอร์สให้ใช้เหตุการณ์แรก
• หากอักขระอย่างน้อยหนึ่งตัวไม่ปรากฏในแหล่งที่มาอักขระนั้นควรอยู่ท้าย คำสั่งของพวกเขาไม่สำคัญและไม่ต้องสอดคล้องกัน
• แหล่งที่มาจะต้องไม่ว่างเปล่า
• ขึ้นบรรทัดใหม่จะถือว่าเหมือนกับตัวละครอื่น ๆ
• ลำดับที่ใช้รหัสนั้นไม่สำคัญ เพียงแค่สตริงดิบ
• อินพุตอยู่ในการเข้ารหัสเช่นเดียวกับรหัส
• อินพุตถูกจัดเรียงตามอักขระไม่ใช่ไบต์
• การเรียงลำดับจะคำนึงถึงขนาดตัวพิมพ์
• นี่คือcode-golfดังนั้นคำตอบที่สั้นที่สุดเป็นไบต์สำหรับแต่ละภาษาที่ชนะ!

let f = (s, i, o) => o.split("").map(x => [x, s.indexOf(x) == -1 ? s.length + 100 : s.indexOf(x)]).sort(([, a], [, b]) => a - b).map(([x]) => x).join("") === o && i.split("").sort().join("") === o.split("").sort().join("");let g = (s, i) => i.split("").map(x => [x, s.indexOf(x) == -1 ? s.length + 100 + Math.random() : s.indexOf(x)]).sort(([, a], [, b]) => a - b).map(([a]) => a).join("");$(() => $("button").click(() => $("#result").text(f($("#source").val(), $("#input").val(), $("#output").val()) ? "Valid" : `Invalid; example output: \`${g($("#source").val(), $("#input").val())}\``)));

body,label{display: flex;flex-direction: column;}*{white-space: pre;font-family: Inconsolata, Consolas, mono-space;font-size: 14px;}

<script src="https://cdnjs.cloudflare.com/ajax/libs/jquery/3.3.1/jquery.min.js"></script><label>Source: <textarea id="source">ThisIs A Test</textarea></label><label>Input: <textarea id="input">Is it a Test?</textarea></label><label>Output: <textarea id="output">TissI   etta?</textarea></label><div><button>Validate</button> <span id="result"></span></div>

Python 3.8 (เผยแพร่ล่วงหน้า) , 102 100 96 85 79 76 68 61 59 60 ไบต์

c="print(sorted(x:=input(),key=('c=%r;'%c+x).find))";exec(c)

ลองออนไลน์!

-2 ไบต์โดยใช้ สิ่งนี้

-4 ไบต์โดยตระหนักว่า<0====-1และลบสิ่งที่ไม่จำเป็นออก+1

-11 ไบต์ขอบคุณ Neil

-6 ไบต์ขอบคุณ dzaima

-3 ไบต์ต้องขอบคุณก้าน

-8 ไบต์ขอบคุณที่ลบเจ็ดชี้ให้เห็นว่าโปรแกรมสามารถส่งออกรายการของตัวอักษร

-7 ไบต์เนื่องจากศูนย์รวมของการไม่รู้การสลับกลับไปเป็น Python 3.8 และการใช้ :=

-2 ไบต์เนื่องจาก Jo King เปลี่ยนชื่อตัวแปรสำหรับ c ดังนั้นเราจึงไม่สามารถออก ;c

+1 ไบต์เนื่องจากลบเจ็ดชี้ให้เห็นว่าการกรองไม่;ถูกต้อง

APL (Dyalog Unicode) , 14 ไบต์^SBCS

ฟังก์ชันนำหน้าเงียบโดยไม่ระบุชื่อ

'''∘⍋⊃¨⊂'∘⍋⊃¨⊂

⊂ ปิดอาร์กิวเมนต์ (เพื่อดำเนินการโดยรวม)

… ⊃¨ จากนั้นเลือกตัวละครหนึ่งตัวสำหรับแต่ละดัชนีดังต่อไปนี้:

∘⍋ ดัชนีที่จะเรียงลำดับอาร์กิวเมนต์ตามลำดับที่กำหนดโดยสตริงต่อไปนี้ (สมาชิกที่ไม่ใช่สมาชิกทั้งหมดจะเรียงตามลำดับที่ปรากฏ)

'''∘⍋⊃¨⊂' ตัวละคร '∘⍋⊃¨⊂

ลองออนไลน์!

C # (Visual C # Interactive Compiler) , 48 ไบต์

n=>n.OrderBy((@"n=>.OrdeBy(@""+)Ixf"+n).IndexOf)

ลองออนไลน์!

JavaScript (Node.js) , 60 58 56 ไบต์

-2 bytes จาก Jo King

f=_=>_.sort((a,b)=>(p=g=>`f=${f+g}`.indexOf(g))(a)-p(b))

ลองออนไลน์!

Perl 6 , 56 ไบต์

<slurp.comb.sort({"<$_>~EVAL$^a".index($a)}).say>~~.EVAL

ลองออนไลน์!

Ruby , 57 ไบต์

->s{s.sort_by{|o|%{->s{.ort_by|%}index()9}.index(o)||99}}

ลองออนไลน์!

ค่อนข้างตรงไปตรงมาสมมติว่าฉันไม่ได้พลาดการเล่นกอล์ฟ ใช้ในรายการของตัวละครและเรียงลำดับตามดัชนีในสตริงที่ประกอบด้วยอักขระ uniq ทั้งหมดในรหัสตามลำดับที่ปรากฏ บ่อยครั้งที่การปรากฏตัวครั้งแรกของพวกเขาอยู่ในสายอักขระนั้นมาก แต่นั่นไม่ได้เปลี่ยนลำดับ

05AB1E , 24 22 21 ไบต์

Σ"Σ"'"«"'«Rrk}"«Rrk}R

ลองออนไลน์!

คำอธิบาย:

Σ                    }               # Sort
 "Σ"                                 # Σ string literal
    '"                               # " string literal
       «                             # Concatenate last two literals
        "'«Rrk}"                     # '«Rrk} another literal
                «                    # Concat again
                 R                   # Reverse literal (so: }krR'«'"Σ)
                  r                  # reverse stack 
                   k                 # find the current sorting index in our code string 
                     R               # reverse our sorted string

ครั้งแรกที่ทดลองใช้สิ่งต่างๆใน 05AB1E อาจมีการบันทึกจำนวนมาก

เยลลี่ , 16 14 ไบต์ (หน้ารหัสวุ้น), 25 ไบต์ (UTF8)

“Ṿv`Ṿ;³³i@Þ”v`

ลองออนไลน์!

โปรแกรมเต็มรูปแบบที่รับอาร์กิวเมนต์เดี่ยวสตริงที่จะเรียงลำดับ

ขอบคุณ @JonathanAllan ที่ชี้ให้เห็นข้อผิดพลาด!

ตาม @EriktheOutgolfer ถึงแม้ว่ารหัสสามารถใส่ได้โดยใช้หน้ารหัส Jelly แต่ตัวละครที่เรียงลำดับนั้นเป็น UTF-8 ที่เทียบเท่ากันแทนที่จะเป็นไบต์ของแหล่งที่มา ด้วยเหตุนี้ฉันจึงรวมคะแนนเป็น UTF-8 ด้วย โปรดทราบว่าอาจใช้กับทุกภาษาที่มีหน้ารหัสที่กำหนดเอง

คำอธิบาย

“Ṿv`Ṿ;³³i@Þ”   | The string "Ṿv`Ṿ;³³i@Þ", referred to below as S
            v` | Evaluate this string as Jelly code using the string itself as the argument

สตริงด้านบนประเมินว่า:

Ṿ          | Uneval the string S (effectively wraps it in “”)
 v`        | Eval it (effectively removes the “”)
   Ṿ       | Uneval it again, adding back in the “”
    ;³     | Concatenate the input to this
      ³i@Þ | Sort the input with respect to the first occurence of each character in the “”-wrapped string S concatenated to the input

Ṿv` ไม่มีตัวเลือกอย่างมีประสิทธิภาพที่นี่ แต่มีอยู่เพื่อให้แน่ใจว่ามีการแสดงอักขระทั้งหมด

เยลลี่ขนาด 14 ไบต์

“;fɓḟṾⱮ”ṾɓfⱮ;ḟ

โปรแกรมเต็มรูปแบบยอมรับสตริง (จัดรูปแบบ Python) (ของตัวอักษรหน้าโค้ด Jelly ) ซึ่งพิมพ์ผลลัพธ์
(เป็นลิงค์ monadic มันทำให้รายการของรายการของตัวละคร)

ลองออนไลน์!

อย่างไร?

“;fɓḟṾⱮ”ṾɓfⱮ;ḟ - Main Link: list of characters, S
“;fɓḟṾⱮ”       - list of characters = [';', 'f', 'ɓ', 'ḟ', 'Ṿ', 'Ɱ']
        Ṿ      - un-evaluate = ['“', ';', 'f', 'ɓ', 'ḟ', 'Ṿ', 'Ɱ', '”']
         ɓ     - start a new dyadic chain, F(S, T=that):
           Ɱ   - for each character, t, in T:
          f    -   (S) filter keep any of (the single character, t)
             ḟ - (S) filter discard any of (the characters in T)
            ;  - concatenate

ถ่าน , 37 ไบต์

≔´≔´´´η´Ｆ´Φ´θ´⁼´ι´κ´¬´№ηＦηΦθ⁼ικΦθ¬№ηι

ลองออนไลน์! คำอธิบาย:

≔´≔´´´η´Ｆ´Φ´θ´⁼´ι´κ´¬´№η

มีสองวิธีในการอ้างอิงอักขระใน Charcoal; ´อัญประกาศอักขระเดี่ยวใด ๆ ในขณะที่”y... ”อัญประกาศอักขระใด ๆ ยกเว้น”และยังนับเป็นสตริงแยกต่างหาก ปรากฎว่าค่าโสหุ้ยในการจัดการกับ”วิธีการที่จะไม่ท้ายนักกอล์ฟใด ๆ

ＦηΦθ⁼ικ

วนรอบตัวอักขระในทางกลับกันออกอักขระใด ๆ ที่ตรงกันจากอินพุต นี่เป็นการเรียงลำดับอินพุต

Φθ¬№ηι

เอาต์พุตอักขระที่ไม่ตรงกันใด ๆ ในอินพุต

J , 14 ไบต์

ฟังก์ชันนำหน้าเงียบโดยไม่ระบุชื่อ

]/:']/:''i'i:]

ลองออนไลน์!

] อาร์กิวเมนต์

... i: การเกิดขึ้นครั้งสุดท้าย (ที่ไม่ใช่สมาชิกจะได้รับดัชนีนอกเหนือจากจุดสิ้นสุดของการค้นหาสตริง) ของตัวละครแต่ละตัวใน:

']/:''i' ตัวละคร ]/:'i

... /: ใช้สิ่งนั้นเพื่อจัดเรียง:

] อาร์กิวเมนต์

Java 10, 129 100 ไบต์

s->{s.sort(java.util.Comparator.comparing(c->("s->{.ort(javuilCmpcng\"\\+)dexOf;}"+c).indexOf(c)));}

-29 ไบต์โดยย้ายระบบ+cจาก@EmbodimentOfIgnorance 's C # คำตอบ

ลองออนไลน์

คำอธิบาย:

s->{                 // Method with char-List parameter and no return-type
  s.sort(java.util.Comparator.comparing(c->
    ("s->{.ort(javuilCmpcng\"\\+)dexOf;}"
                     //  Push a String containing the characters in the code
     +c)             //  Append the current character
        .indexOf(c)  //  And get the first index of the current character in the String

หมายเหตุ: โดยปกติแล้วราคาถูกกว่าการใช้งานs.sort((a,b)->Long.compare(a,b))แทนs.sort(java.util.Comparator.comparing(c->c)แต่ในกรณีนี้จะมีความยาว 11 ไบต์:

s->{var v="s->{var =\"\\;.ot(,)Lngcmpe+idxOf}";s.sort((a,r)->Long.compare((v+a).indexOf(a),(v+r).indexOf(r)));}

ลองออนไลน์

05AB1E , 31 26 19 ไบต์

Σ'"'ÿs"Σ'ÿÿsìyk"ìyk

-7 ไบต์โดยใช้แรงบันดาลใจของวิธีการของ@ EmbodimentOfIgnorance ในคำตอบ C #ของเขาต่อท้ายอักขระปัจจุบันก่อนทำดัชนี

ลองมันออนไลน์หรือลองกับเพิ่มการแก้ปัญหาเส้นเพื่อดูสตริงที่ถูกจัดทำดัชนีลงไป

คำอธิบาย:

Σ                 # Sort the (implicit) input-string by:
 '"              '#  Push string '"'
   'ÿ            '#  Push string "ÿ"
     s            #  Swap the order of these two strings on the stack
      "Σ'ÿÿsìyk"  #  Push string "Σ'ÿÿsìyk", where the `ÿ` are automatically filled with
                  #  the previous strings we created: `Σ'"ÿsìyk`
                  #  (top to bottom from stack; left to right in string)
       ì          #  Prepend this string in front of the character we're sorting
        yk        #  And then get the index of the character we're sorting in this string
                  # (after the sorting the resulting string is output implicitly)

PowerShell , 68 ไบต์

$p=$args
&($t={$p|sort-object{"`$p=`$args
&(`$t={$t})$_"|% i*f $_}})

ลองออนไลน์!

Python 2, 62 bytes

lambda a:sorted(a,key=('lambd :sorted(,ky=\'\\+).fin'+a).find)

Same concept as my C# answer.

Try it online!

Japt, 18 bytes

ñÈi"ñÈi\"\\ bX" bX

Try it

ñÈi"ñÈi\"\\ bX" bX     :Implicit input of string or character array
ñ                      :Sort by
 È                     :Passing each X through the following function
  i                    :  Prepend X with
   "ñÈi\"\\ bX"        :    Literal string (The \s are annoying me!)
                bX     :  First index of X

Jelly, 26 bytes (UTF-8*)

“®³nÞṾ©V”Ṿ©VV

Try it online!

Takes input as a Python-formatted string in the 1st command-line argument.

ตัวละครที่ไม่ซ้ำกัน :

“®³nÞṾ©V”

* หมายเหตุ: ฉันค้นพบว่าวิธีนี้ใช้ไม่ได้เมื่อเข้ารหัสใน JELLY เนื่องจากมันเรียงลำดับอักขระ UTF-8 แทนไบต์ของตัวเอง