Biorąc pod uwagę ciąg x, wypisz znaki xposortowane zgodnie z kolejnością pojawiania się w kodzie źródłowym.

Przykłady

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:

Zasady

• Obowiązują standardowe luki i zasady we / wy
• Dane wejściowe i wyjściowe mogą być łańcuchem, listą znaków lub listą bajtów.
• Jeśli znak jest używany wiele razy w źródle, użyj pierwszego wystąpienia.
• Jeśli jeden lub więcej znaków nie pojawia się w źródle, powinny znajdować się na końcu; ich kolejność nie ma znaczenia, ani nie musi być spójna.
• Źródło musi być niepuste
• Nowe linie są traktowane tak samo jak inne znaki.
• Kolejność wykonywania kodu nie ma znaczenia; tylko surowy ciąg.
• Dane wejściowe mają takie samo kodowanie jak kod.
• Dane wejściowe są sortowane według znaków, a nie według bajtów.
• W sortowaniu rozróżniana jest wielkość liter
• To jest golf golfowy , więc wygrywa najkrótsza odpowiedź w bajtach dla każdego języka!

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 (wersja wstępna) , 102 100 96 85 79 76 68 61 59 60 bajtów

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

Wypróbuj online!

-2 bajty za pomocą tego

-4 bajty, wiedząc, że <0== ==-1i usuwając niepotrzebne+1

-11 bajtów dzięki Neilowi

-6 bajtów dzięki dzaima

-3 bajty dzięki wędce

-8 bajtów dzięki ujemnej siódemce wskazującej, że program może wypisać listę znaków

-7 bajtów ze względu na przejście Embodiment of Ignorance do Python 3.8 i użycie :=

-2 bajty z powodu przełączenia przez Jo King nazwy zmiennej s dla c, abyśmy mogli pominąć ;c

+1 bajtów, ponieważ siedem ujemne wskazało, że nie filtruje ;poprawnie

APL (Dyalog Unicode) , 14 bajtów ^SBCS

Anonimowa ukryta funkcja prefiksu.

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

⊂ dołącz argument (aby działać na nim jako całości)

… ⊃¨ Z tego wybierz po jednym znaku dla każdego z następujących wskaźników:

∘⍋ indeksy, które posortowałyby argument w kolejności podanej przez następujący ciąg (wszyscy nie-członkowie idą w kolejności pojawienia się na końcu):

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

Wypróbuj online!

C # (interaktywny kompilator Visual C #) , 48 bajtów

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

Wypróbuj online!

JavaScript (Node.js) , 60 58 56 bajtów

-2 bajty od Jo King

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

Wypróbuj online!

Perl 6 , 56 bajtów

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

Wypróbuj online!

Rubinowy , 57 bajtów

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

Wypróbuj online!

Dość proste, zakładając, że nie przegapiłem sztuczki golfowej. Pobierz listę znaków i posortuj według ich indeksu w ciągu zawierającym wszystkie znaki uniq w kodzie w kolejności ich wyglądu. Często ich pierwszy występ pojawia się w tym samym szeregu, ale to nie zmienia kolejności.

05AB1E , 24 22 21 bajtów

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

Wypróbuj online!

Wyjaśnienie:

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

Po raz pierwszy próbuję rzeczy w 05AB1E, więc prawdopodobnie wiele do ocalenia

Galaretka , 16 14 bajtów (strona kodu galaretki), 25 bajtów (UTF8)

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

Wypróbuj online!

Pełny program, który pobiera pojedynczy argument, ciąg znaków do posortowania.

Dzięki @JonathanAllan za wskazanie błędu!

Zgodnie z @EriktheOutgolfer, chociaż kod można wprowadzić za pomocą strony kodowej Jelly, posortowane znaki są odpowiednikami UTF-8, a nie bajtów źródła. Jako taki, uwzględniłem także wynik w bajtach UTF-8. Uwaga: to samo prawdopodobnie dotyczy wszystkich języków z niestandardowymi stronami kodowymi.

Wyjaśnienie

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

Powyższy ciąg jest oceniany jako:

Ṿ          | 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` jest tutaj opcją skuteczną, ale istnieje, aby zapewnić reprezentację wszystkich postaci.

Galaretka , 14 bajtów

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

Pełny program akceptujący (sformatowany w języku Python) ciąg znaków (znaków strony kodowej Jelly ), który wypisuje dane wyjściowe.
(jako monadyczny link daje listę list znaków)

Wypróbuj online!

W jaki sposób?

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

Węgiel drzewny , 37 bajtów

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

Wypróbuj online!Wyjaśnienie:

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

Istnieją dwa sposoby cytowania znaków w Charcoal; ´cytuje dowolny pojedynczy znak, podczas gdy ”y... ”cytuje dowolny znak oprócz, ”a także liczy się jako osobny ciąg. Okazuje się, że narzut związany z koniecznością radzenia sobie z ”tym oznacza, że ​​nie kończy się to na golfie.

ＦηΦθ⁼ικ

Z kolei zapętlaj znaki, wypisując z nich wszystkie pasujące znaki. To posortuje dane wejściowe.

Φθ¬№ηι

Wypisuj dowolne niedopasowane znaki na wejściu.

J , 14 bajtów

Anonimowa ukryta funkcja prefiksu.

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

Wypróbuj online!

] argument

… i: Ostatnie wystąpienie (osoby niebędące członkami uzyskują indeks poza koniec ciągu wyszukiwania) każdego znaku w:

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

… /: Użyj tego do sortowania:

] argument

Java 10, 129 100 bajtów

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

-29 bajtów przez przeniesienie odpowiedzi C #+c z @EmbodimentOfIgnorance .

Wypróbuj online.

Wyjaśnienie:

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

UWAGA: Zazwyczaj jest to tańsze używać s.sort((a,b)->Long.compare(a,b))zamiast s.sort(java.util.Comparator.comparing(c->c), ale w tym przypadku byłoby to 11 bajtów dłużej:

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

Wypróbuj online.

05AB1E , 31 26 19 bajtów

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

-7 bajtów, czerpiąc inspirację z podejścia @ EmbodimentOfIgnorance w jego odpowiedzi w języku C # dodania bieżącego znaku przed indeksowaniem.

Wypróbuj online lub wypróbuj z dodaną linią debugowania, aby zobaczyć ciągi, które są indeksowane .

Wyjaśnienie:

Σ                 # 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 bajtów

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

Wypróbuj online!

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.