Überraschenderweise hatten wir noch keine einfache Herausforderung, die höchste Ziffer zu finden, aber ich denke, das ist etwas zu trivial.

Bei Eingabe einer nicht negativen Ganzzahl wird die höchste eindeutige (dh nicht wiederholte) Ziffer zurückgegeben, die in der Ganzzahl gefunden wurde. Wenn es keine eindeutigen Ziffern gibt, kann Ihr Programm alles tun (undefiniertes Verhalten).

Die Eingabe kann als einzelne Ganzzahl, Zeichenfolge oder Ziffernliste erfolgen.

Testfälle

12         -> 2
0          -> 0
485902     -> 9
495902     -> 5
999999     -> Anything
999099     -> 0
1948710498 -> 7

Dies ist Codegolf, so dass die wenigsten Bytes in jeder Sprache gewinnen!

05AB1E , 4 3 Bytes

1 Byte gespeichert , da Mr. Xcoder mitteilt, dass eine Ziffernliste eine gültige Eingabe ist.

¢ÏM

Probieren Sie es online!

Erläuterung

¢     # count occurrences of each digit in input
 Ï    # keep only the digits whose occurrences are true (1)
  M   # push the highest

Python 3 , 40 Bytes

2 Bytes gespart dank movatica .

lambda i:max(x*(i.count(x)<2)for x in i)

Probieren Sie es online!

42 Bytes

Funktioniert sowohl für Zeichenfolgen- als auch für Ziffern-Parametertypen. Wirft einen Fehler für keine eindeutigen Ziffern, Art des Missbrauchs dieser Spezifikation:

lambda i:max(x for x in i if i.count(x)<2)

Probieren Sie es online!

Erläuterung

• lambda i: - Deklariert eine Lambda-Funktion mit einem String oder einer Liste von Ziffern, Parameter i.
• max(...) - Findet den Maximalwert des Generators.
• x for x in i- Durchläuft die Zeichen / Ziffern von i.
• if i.count(x)<2 - Überprüft, ob die Ziffer eindeutig ist.

Alice , 15 Bytes

/&.sDo
\i-.tN@/

Probieren Sie es online!

Erläuterung

/...
\.../

Dies ist ein einfaches Framework für linearen Code, das vollständig im Ordinal-Modus ausgeführt wird (dh, dieses Programm arbeitet vollständig mit Zeichenfolgen). Der entfaltete lineare Code ist dann einfach:

i..DN&-sto@

Was es macht:

i    Read all input as a string.
..   Make two copies.
D    Deduplicate the characters in the top copy.
N    Get the multiset complement of this deduplicated string in the input.
     This gives us a string that only contains repeated digits (with one
     copy less than the original, but the number of them doesn't matter).
&-   Fold string subtraction over this string, which means that each of
     the repeated digits is removed from the input.
s    Sort the remaining digits.
t    Split off the last digit.
o    Print it.
@    Terminate the program.

Netzhaut , 16 Bytes

O`.
(.)\1+

!`.$

Probieren Sie es online!

Erläuterung

O`.

Sortieren Sie die Ziffern.

(.)\1+

Wiederholte Ziffern entfernen.

!`.$

Holen Sie sich die letzte (maximale) Ziffer.

Kohle , 18 12 Bytes

Ｆχ¿⁼№θＩι¹ＰＩι

Probieren Sie es online! (Link zur ausführlichen Version)

Druckt nichts, wenn keine Lösung gefunden wird. Der Trick besteht darin, dass die forSchleife jede eindeutige Zahl in der Eingabezeichenfolge ausgibt, ohne den Cursor zu bewegen. Der Wert wird also so lange selbst gedruckt, bis die endgültige Lösung gefunden ist.

In der vorherigen Version wurden die Zeichen A bis Z gedruckt, als keine Lösung gefunden wurde, daher die Kommentare:

ＡααＦχＡ⎇⁼№θＩι¹Ｉιααα

Probieren Sie es online! (Link zur ausführlichen Version)

Schale , 7 Bytes

→fo¬hgO

Probieren Sie es online! (Testsuite, stürzt beim letzten Testfall ab, da sie keine eindeutigen Ziffern enthält)

Hierbei handelt es sich um eine Komposition von Funktionen in punktfreiem Stil (die Argumente werden nirgendwo explizit erwähnt). Übernimmt die Eingabe und gibt die Ausgabe als Zeichenfolge zurück, was in Husk einer Liste von Zeichen entspricht.

Erläuterung

Test case: "1948710498"

      O    Sort:                             "0114478899"
     g     Group consecutive equal elements: ["0","11","44","7","88","99"]
 fo¬h      Keep only those with length 1*:   ["0","7"]
→          Take the last element:            "7"

* Die Prüfung auf Länge 1 erfolgt, indem der Kopf der Liste (alle Elemente außer dem letzten) genommen und negiert wird (leere Listen sind falsch, nicht leere Listen sind wahr).

Haskell, 37 Bytes

f s=maximum[x|x<-s,[x]==filter(==x)s]

Probieren Sie es online!

Wie es funktioniert:

  [  |x<-s   ]          -- loop x through the input string s
    x                   -- and keep the x where
     [x]==filter(==x)s  -- all x extracted from s equal a singleton list [x]
maximum                 -- take the maximum of all the x

R , 41 Bytes

function(x,y=table(x))max(names(y[y==1]))

Eine anonyme Funktion, die eine Liste von Ziffern entweder als Ganzzahlen oder als einzelne Zeichenfolgen akzeptiert. Es wird yals optionales Argument vorberechnet , um die Verwendung von geschweiften Klammern für den Funktionskörper zu vermeiden. Liefert die Ziffer als String. Dies sieht ein wenig anders aus als die andere R-Antwort und ist am Ende das kleinste bisschen kürzer! sieht aus wie mein Kommentar da doch falsch war ...

tableberechnet das Vorkommen jedes Elements in der Liste, wobei names(table(x))es sich um die eindeutigen Werte in x(als Zeichenfolgen) handelt. Da die Ziffern glücklicherweise lexikografisch wie numerisch gleich geordnet sind, können wir sie weiterhin verwenden max.

Probieren Sie es online!

JavaScript (ES6), 46 41 40 Byte

Übernimmt die Eingabe als Zeichenfolge. Gibt RangeError zurück, wenn keine eindeutigen Ziffern vorhanden sind.

s=>f=(i=9)=>s.split(i).length-2?f(--i):i

-7 Bytes dank Rick Hitchcock

-1 Byte dank Shaggy

Testfälle

let f =

s=>g=(i=9)=>s.split(i).length-2?g(--i):i


console.log(f("12")())         // 2
console.log(f("0")())          // 0
console.log(f("485902")())     // 9
console.log(f("495902")())     // 5
//console.log(f("999999")())   // RangeError
console.log(f("999099")())     // 0
console.log(f("1948710498")()) // 7

Python 3, 40 Bytes

lambda i:max(x+9-9*i.count(x)for x in i)

Funktioniert nur für Ziffernlisten. Das Edge-Case '990' funktioniert einwandfrei :)

Probieren Sie es online!

Brachylog , 8 Bytes

ọtᵒtᵍhth

Probieren Sie es online!

Erläuterung

Example input: 495902

ọ          Occurences:    [[4,1],[9,2],[5,1],[0,1],[2,1]]
 tᵒ        Order by tail: [[0,1],[2,1],[4,1],[5,1],[9,2]]
   tᵍ      Group by tail: [[[0,1],[2,1],[4,1],[5,1]],[[9,2]]]
     h     Head:          [[0,1],[2,1],[4,1],[5,1]]
      t    Tail:          [5,1]
       h   Head:          5

Schale , 9 8 Bytes

Vielen Dank an Leo, der eine etwas übersichtlichere Lösung bei gleicher Byteanzahl vorgeschlagen hat.

▲‡ȯf=1`#

Probieren Sie es online!

Erläuterung

  ȯ       Compose the following thre functions into one binary function.
      `#  Count the occurrences of the right argument in the left.
    =1    Check equality with 1. This gives 1 (truthy) for values that 
          appear uniquely in the right-hand argument.
   f      Select the elements from the right argument, where the function
          in the left argument is truthy.
          Due to the composition and partial function application this
          means that the first argument of the resulting function actually
          curries `# and the second argument is passed as the second
          argument to f. So what we end up with is a function which selects
          the elements from the right argument that appear uniquely in
          the left argument.
 ‡        We call this function by giving it the input for both arguments.
          So we end up selecting unique digits from the input.
▲         Find the maximum.  

Mathematica, 41 Bytes

(t=9;While[DigitCount[#][[t]]!=1,t--];t)&

danke @Martin Ender

Hier ist Martins Ansatz für meine Antwort

Mathematica, 35 Bytes

9//.d_/;DigitCount[#][[d]]!=1:>d-1&

R 45 43 Bytes

function(x)max(setdiff(x,x[duplicated(x)]))

Probieren Sie es online!

Nimmt die Eingabe als Vektor von ganzen Zahlen. Findet die duplizierten Elemente, entfernt sie und nimmt das Maximum ein. (Kehrt -Infmit einer Warnung zurück, wenn es kein eindeutiges Maximum gibt.)

Wird per Kommentar in eine anonyme Funktion umgewandelt

Ruby , 42 Bytes

->x{(?0..?9).select{|r|x.count(r)==1}[-1]}

Probieren Sie es online!

APL (Dyalog Unicode) , 10 Zeichen = 19 Byte

Methode: Multiplizieren Sie Elemente, die mehrfach vorkommen, mit Null und verfeinern Sie dann das höchste Element.

⌈/×∘(1=≢)⌸

⌸ für jedes einzelne Element und seine Indizes im Argument:

 × multiplizieren Sie das einzigartige Element

 ∘(… ) Mit:

  1= der Boolesche Wert, ob man gleich ist

  ≢ die Anzahl der Indizes (wie oft das eindeutige Element vorkommt)

⌈/ das Maximum davon

Probieren Sie es online!

APL (Dyalog Classic) , 15 Byte

⌈/×∘(1=≢)⎕U2338

Probieren Sie es online!

Identisch mit den oben genannten, aber verwendet ⎕U2338anstelle von ⌸.

Bash + Coreutils, 30 28 Bytes

-2 Bytes dank Digital Trauma

fold -1|sort|uniq -u|tail -1

Probieren Sie es online!

Bash + Coreutils, 20 Bytes

sort|uniq -u|tail -1

Probieren Sie es online!

Wenn die Eingabe als Ziffernliste erfolgt, eine pro Zeile, können wir die Fold-Phase überspringen. Das fühlt sich an wie Betrug.

Python 2 , 39 Bytes

lambda l:max(1/l.count(n)*n for n in l)

Probieren Sie es online!

C # (.NET Core) , 27 97 86 58 57 75 Bytes

using System.Linq;

n=>n.GroupBy(i=>i).Where(i=>i.Count()<2).Max(i=>i.Key)-48

Probieren Sie es online!

Vielen Dank @CarlosAlejo

JavaScript (ES6), 52 bis 50 Byte

Übernimmt die Eingabe als Ziffernliste. Gibt zurück, 0wenn keine eindeutigen Ziffern vorhanden sind.

s=>s.reduce((m,c)=>m>c|s.filter(x=>x==c)[1]?m:c,0)

Testfälle

let f =

s=>s.reduce((m,c)=>m>c|s.filter(x=>x==c)[1]?m:c,0)

console.log(f([1,2]))                 // 2
console.log(f([0]))                   // 0
console.log(f([4,8,5,9,0,2]))         // 9
console.log(f([4,9,5,9,0,2]))         // 5
console.log(f([9,9,9,9,9,9]))         // (0)
console.log(f([9,9,9,0,9,9]))         // 0
console.log(f([1,9,4,8,7,1,0,4,9,8])) // 7

Japt , 12 11 10 Bytes

Nimmt die Eingabe als ein Array von Ziffern.

k@¬èX ÉÃrw

Probier es aus

Erläuterung

     :Implicit input of array U.
k    :Filter the array to the elements that return false when...
@    :Passed through a function that...
¬    :Joins U to a string and...
èX   :Counts the number of times the current element (X) appears in the string...
É    :Minus 1.
     :(The count of unique digits will be 1, 1-1=0, 0=false)
à   :End function.
r    :Reduce by...
w    :Getting the greater of the current element and the current value.
     :Implicit output of resulting single digit integer.

Java (OpenJDK 8) , 89 85 79 Bytes

a->{int i=10,x[]=new int[i];for(int d:a)x[d]++;for(;i-->0&&x[i]!=1;);return i;}

Probieren Sie es online!

-6 Bytes dank @ KevinCruijssens Einsicht!

APL (Dyalog) , 14 Bytes

-2 dank TwiNight.

⌈/⊢×1=(+/∘.=⍨)

⌈/ der größte von

⊢ die Argumente

× multipliziert mit

1=(… ) Der Boolesche Wert für jeden, bei dem einer gleich ist

 +/ die reihensummen von

 ∘.=⍨ ihre Gleichheitstabelle

Probieren Sie es online!

PHP , 40 Bytes

<?=array_flip(count_chars($argn))[1]-48;

Probieren Sie es online!

PHP , 42 Bytes

<?=chr(array_flip(count_chars($argn))[1]);

Probieren Sie es online!

Java (JDK) , 67 Byte

s->{int i=9;for(s=" "+s+" ";s.split(i+"").length!=2;i--);return i;}

Probieren Sie es online!

Mathematica, 42 Bytes

Max@Position[RotateRight@DigitCount@#,1]-1&

F # , 88 Bytes

let f i=Seq.countBy(fun a->a)i|>Seq.maxBy(fun a->if snd a>1 then 0 else int(fst a))|>fst

Probieren Sie es online!

Ein verbesserter Ansatz von meinem ersten Versuch führt zu weniger Bytes.

Points of Interest: fstund sndgeben das erste und zweite Element eines Tupels zurück.

Gelee , 9 Bytes

ṢŒrṪỊ$ÐfṀ

Probieren Sie es online!

Pyth, 6 Bytes

eS.m/Q

Testsuite

Erläuterung:

eS.m/Q
eS.m/QbQ    Implicit variable introduction
  .m   Q    Find all minimal elements of the input by the following function:
    /Qb     Number of appearances in the input
eS          Take the maximum element remaining.

Perl 5 , 59 Bytes

for$x(split//,<>){$d[$x]++};for($x=11;--$d[--$x];){}print$x

Probieren Sie es online!