Étant donné une chaîne x, affichez les caractères dansx triés selon l'ordre d'apparition dans votre code source.

Exemples

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:

Règles

• Les échappatoires standard et les règles d'E / S s'appliquent
• L'entrée et la sortie peuvent être une chaîne, une liste de caractères ou une liste d'octets.
• Si un caractère est utilisé plusieurs fois dans la source, utilisez la première occurrence.
• Si un ou plusieurs caractères n'apparaissent pas dans la source, ils doivent être à la fin; leur ordre n'a pas d'importance, ni ne doit être cohérent.
• La source doit être non vide
• Les retours à la ligne sont traités de la même manière que les autres caractères.
• L'ordre dans lequel le code est exécuté n'a pas d'importance; juste la chaîne brute.
• L'entrée est dans le même codage que le code.
• L'entrée est triée par caractères et non par octets.
• Le tri est sensible à la casse
• Il s'agit de code-golf , donc la réponse la plus courte en octets pour chaque langue gagne!

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 (pré-presse) , 102 100 96 85 79 76 68 61 59 60 octets

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

Essayez-le en ligne!

-2 octets en utilisant ceci

-4 octets en réalisant que <0== ==-1et en supprimant l'inutile+1

-11 octets grâce à Neil

-6 octets grâce à dzaima

-3 octets grâce à la tige

-8 octets grâce à sept négatifs indiquant que le programme peut afficher une liste de caractères

-7 octets en raison de l'incarnation de l'ignorance revenant à Python 3.8 et utilisant :=

-2 octets en raison de la substitution par Jo King du nom de variable s pour c, nous pourrions donc laisser de ;c

+1 octet, car sept négatifs ont indiqué qu'il ne filtrait pas ;correctement

APL (Dyalog Unicode) , 14 octets ^SBCS

Fonction de préfixe tacite anonyme.

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

⊂ joindre l'argument (pour agir dans son ensemble)

… À ⊃¨ partir de là, choisissez un caractère pour chacun des indices suivants:

∘⍋ les indices qui trieraient l'argument dans l'ordre donné par la chaîne suivante (tous les non-membres vont par ordre d'apparition à la fin):

'''∘⍋⊃¨⊂' les personnages '∘⍋⊃¨⊂

Essayez-le en ligne!

C # (Visual C # Interactive Compiler) , 48 octets

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

Essayez-le en ligne!

JavaScript (Node.js) , 60 58 56 octets

-2 octets de Jo King

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

Essayez-le en ligne!

Perl 6 , 56 octets

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

Essayez-le en ligne!

Rubis , 57 octets

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

Essayez-le en ligne!

Assez simple, en supposant que je n'ai pas raté un tour de golf. Prenez une liste de caractères et triez par leur index dans une chaîne composée de tous les caractères uniq du code dans l'ordre de leur apparition. Souvent, leur première apparition est dans cette même chaîne, mais cela ne change pas l'ordre.

05AB1E , 24 22 21 octets

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

Essayez-le en ligne!

Explication:

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

Première fois que vous essayez des trucs dans 05AB1E, donc probablement beaucoup à économiser

Jelly , 16 14 octets (page Jelly Code), 25 octets (UTF8)

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

Essayez-le en ligne!

Un programme complet qui prend un seul argument, la chaîne à trier.

Merci à @JonathanAllan d'avoir signalé un bug!

Selon @EriktheOutgolfer, bien que le code puisse être entré à l'aide de la page de codes Jelly, les caractères triés sont les équivalents UTF-8 plutôt que les octets de la source. En tant que tel, j'ai également inclus le score dans les octets UTF-8. Notez que la même chose s'applique probablement à toutes les langues avec des pages de codes personnalisées.

Explication

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

La chaîne ci-dessus s'évalue comme:

Ṿ          | 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` est un no-op effectivement ici, mais existe pour s'assurer que tous les personnages sont représentés.

Gelée , 14 octets

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

Un programme complet acceptant une chaîne (formatée Python) (de caractères de page de code Jelly ) qui imprime la sortie.
(en tant que lien monadique, il fournit une liste de listes de caractères)

Essayez-le en ligne!

Comment?

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

Fusain , 37 octets

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

Essayez-le en ligne!Explication:

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

Il existe deux façons de citer des caractères dans Charcoal; ´cite n'importe quel caractère tandis que ”y... ”cite tout caractère sauf ”et compte également comme une chaîne distincte. Il s'avère que le surcoût ”lié à la gestion signifie qu'il ne finit pas par un golfeur.

ＦηΦθ⁼ικ

Faites une boucle sur les caractères à tour de rôle, en sortant tous les caractères correspondants de l'entrée. Cela trie l'entrée.

Φθ¬№ηι

Sortez tous les caractères sans correspondance dans l'entrée.

J , 14 octets

Fonction de préfixe tacite anonyme.

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

Essayez-le en ligne!

] l'argument

… i: Dernière occurrence (les non-membres récupèrent l'index au-delà de la fin de la chaîne de recherche) de chaque caractère dans:

']/:''i' les personnages ]/:'i

… /: Utilisez-le pour trier:

] l'argument

Java 10, 129 100 octets

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

-29 octets en portant la réponse C #+c de @EmbodimentOfIgnorance .

Essayez-le en ligne.

Explication:

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

REMARQUE: il est généralement moins cher d'utiliser s.sort((a,b)->Long.compare(a,b))au lieu de s.sort(java.util.Comparator.comparing(c->c), mais dans ce cas, il serait plus long de 11 octets:

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

Essayez-le en ligne.

05AB1E , 31 26 19 octets

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

-7 octets en s'inspirant de l'approche de @ EmbodimentOfIgnorance dans sa réponse C # consistant à ajouter le caractère courant avant l'indexation.

Essayez-le en ligne ou essayez-le avec une ligne de débogage supplémentaire pour voir les chaînes qui sont indexées .

Explication:

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

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

Essayez-le en ligne!

Python 2, 62 bytes

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

Same concept as my C# answer.

Essayez-le en ligne!

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.