Đưa ra một chuỗi x, xuất các ký tự được xsắp xếp theo thứ tự xuất hiện trong mã nguồn của bạn.

Ví dụ

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:

Quy tắc

• Quy tắc tiêu chuẩn & quy tắc i / o áp dụng
• Đầu vào và đầu ra có thể là một chuỗi, một danh sách các ký tự hoặc một danh sách các byte.
• Nếu một ký tự được sử dụng nhiều lần trong nguồn, hãy sử dụng lần xuất hiện đầu tiên.
• Nếu một hoặc nhiều ký tự không xuất hiện trong nguồn, chúng sẽ ở cuối; trật tự của họ không quan trọng, cũng không nhất quán.
• Nguồn phải không trống
• Dòng mới được đối xử giống như các nhân vật khác.
• Thứ tự thực thi mã không thành vấn đề; chỉ là chuỗi thô.
• Đầu vào là cùng mã hóa với mã.
• Đầu vào được sắp xếp theo các ký tự, không phải theo byte.
• Sắp xếp là trường hợp nhạy cảm
• Đây là môn đánh gôn , vì vậy câu trả lời ngắn nhất tính theo byte cho mỗi ngôn ngữ sẽ thắng!

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 (tiền phát hành) , 102 100 96 85 79 76 68 61 59 60 byte

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

Hãy thử trực tuyến!

-2 byte bằng cách sử dụng này

-4 byte bằng cách nhận ra rằng <0== ==-1và loại bỏ những thứ không cần thiết+1

-11 byte nhờ Neil

-6 byte nhờ dzaima

-3 byte nhờ thanh

-8 byte nhờ bảy âm chỉ ra rằng chương trình có thể xuất ra một danh sách các ký tự

-7 byte do Hiện thân của Vô minh chuyển trở lại Python 3.8 và sử dụng :=

-2 byte do Jo King chuyển đổi tên biến s cho c, vì vậy chúng tôi có thể bỏ qua ;c

+1 byte vì âm bảy chỉ ra rằng nó không lọc ;chính xác

APL (Dyalog Unicode) , 14 byte ^SBCS

Chức năng tiền tố ẩn danh.

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

⊂ kèm theo đối số (để hành động trên toàn bộ)

... ⊃¨ từ đó, chọn một ký tự cho mỗi người trong số các chỉ số sau:

∘⍋ các chỉ mục sẽ sắp xếp đối số theo thứ tự được đưa ra bởi chuỗi sau (tất cả những người không phải là thành viên sẽ theo thứ tự xuất hiện ở cuối):

'''∘⍋⊃¨⊂' các nhân vật '∘⍋⊃¨⊂

Hãy thử trực tuyến!

C # (Trình biên dịch tương tác Visual C #) , 48 byte

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

Hãy thử trực tuyến!

JavaScript (Node.js) , 60 58 56 byte

-2 byte từ Jo King

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

Hãy thử trực tuyến!

Perl 6 , 56 byte

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

Hãy thử trực tuyến!

Ruby , 57 byte

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

Hãy thử trực tuyến!

Khá đơn giản, giả sử tôi đã không bỏ lỡ một cú đánh golf. Lấy một danh sách các ký tự và sắp xếp theo chỉ mục của chúng trong một chuỗi bao gồm tất cả các ký tự uniq trong mã theo thứ tự xuất hiện của chúng. Thường thì sự xuất hiện đầu tiên của họ là trong chuỗi đó, nhưng điều đó không thay đổi thứ tự.

05AB1E , 24 22 21 byte

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

Hãy thử trực tuyến!

Giải trình:

Σ                    }               # 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

Lần đầu tiên thử công cụ trong 05AB1E, vì vậy có lẽ rất nhiều thứ sẽ được lưu

Jelly , 16 14 byte (trang Jelly Code), 25 byte (UTF8)

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

Hãy thử trực tuyến!

Một chương trình đầy đủ có một đối số duy nhất, chuỗi được sắp xếp.

Cảm ơn @Jonathan ALLan đã chỉ ra một lỗi!

Theo @EriktheOutgolfer, mặc dù mã có thể được nhập bằng trang mã Jelly, các ký tự được sắp xếp là các UTF-8 tương đương thay vì byte của nguồn. Như vậy, tôi cũng đã bao gồm số điểm tính theo byte UTF-8. Lưu ý tương tự có thể áp dụng cho tất cả các ngôn ngữ với các trang mã tùy chỉnh.

Giải trình

“Ṿ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

Chuỗi trên đánh giá là:

Ṿ          | 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` là không có hiệu quả ở đây, nhưng tồn tại để đảm bảo tất cả các nhân vật được đại diện.

Thạch , 14 byte

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

Một chương trình đầy đủ chấp nhận một chuỗi (định dạng Python) (của các ký tự trang mã Jelly ) in ra đầu ra.
(như một liên kết đơn âm, nó mang lại một danh sách các danh sách các ký tự)

Hãy thử trực tuyến!

Làm sao?

“;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

Than , 37 byte

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

Hãy thử trực tuyến! Giải trình:

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

Có hai cách trích dẫn các ký tự trong Than; ´trích dẫn bất kỳ ký tự đơn nào trong khi ”y... ”trích dẫn bất kỳ ký tự nào ngoại trừ ”và cũng được tính là một chuỗi riêng biệt. Nó chỉ ra rằng chi phí phải giải quyết đồng ”nghĩa với việc nó không kết thúc bất kỳ tay golf nào.

ＦηΦθ⁼ικ

Lặp lại lần lượt các ký tự, xuất ra bất kỳ ký tự trùng khớp nào từ đầu vào. Điều này sắp xếp đầu vào.

Φθ¬№ηι

Xuất ra bất kỳ ký tự chưa từng có trong đầu vào.

J , 14 byte

Chức năng tiền tố ẩn danh.

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

Hãy thử trực tuyến!

] tranh luận

Giáo dụci:  xuất hiện cuối cùng (không phải là thành viên có được chỉ số vượt quá kết thúc của chuỗi tra cứu) của mỗi nhân vật trong:

']/:''i' các nhân vật ]/:'i

Sọ /: sử dụng để sắp xếp:

] tranh luận

Java 10, 129 100 byte

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

-29 byte bằng cách chuyển câu trả lời từ câu trả lời C #+c của @EmbodimentOfIgnorance .

Hãy thử trực tuyến.

Giải trình:

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

LƯU Ý: Thông thường sẽ rẻ hơn khi sử dụng s.sort((a,b)->Long.compare(a,b))thay vì s.sort(java.util.Comparator.comparing(c->c), nhưng trong trường hợp này, nó sẽ dài hơn 11 byte:

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

Hãy thử trực tuyến.

05AB1E , 31 26 19 byte

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

-7 byte bằng cách lấy cảm hứng từ cách tiếp cận của @ EmbodimentOfIgnorance trong câu trả lời C # của mình về việc nối thêm ký tự hiện tại trước khi lập chỉ mục.

Hãy thử trực tuyến hoặc thử với dòng gỡ lỗi bổ sung để xem các chuỗi được lập chỉ mục .

Giải trình:

Σ                 # 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 byte

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

Hãy thử trực tuyến!

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.

Unique characters:

“®³nÞṾ©V”

*Note: I discovered that this doesn't work when encoded in JELLY, since it sorts the UTF-8 characters instead of its own bytes.