Supreme Sum String

Geben Sie bei einer gegebenen Eingabezeichenfolge das Wort mit der höchsten Summe der einzelnen Unicode-Zeichen zurück.

Regeln

• Die Eingabe sollte durch Leerzeichen getrennt werden
• Der Wert jedes Wortes basiert auf der Summe jedes Zeichens im UTF-16-Code des Wortes
• Die Ausgabe sollte das erste Wort mit dem höchsten Wert sein (bei doppelten Summen)

Beispiele

Input: "a b c d e"
Output: "e"

Input: "hello world"
Output: "world"

Input: "this is a test"
Output: "test"

Input: "àà as a test"
Output: "àà"

Input "α ää"
Output: "α"

Input: "🍬 隣隣隣"
Output: "隣隣隣"

Input: "💀 👻 🤡 🦇 🕷️ 🍬 🎃"
Output: "🕷️"

Das ist Codegolf, also gewinnt die kürzeste Antwort! Viel Glück :)

Gelee , 7 Bytes

ḲOS$ÐṀḢ

Probieren Sie es online!

ḲOS$ÐṀḢ
Ḳ        Split input on spaces
    ÐṀ   Give words that have maximum of:
   $       Monad:
 O           ord(each character)
  S          sum
      Ḣ  First word that gives the max ord-sum.

Perl 6 , 34 Bytes

*.words.max(*.encode('utf16').sum)

Probieren Sie es online!

R , 77 69 59 58 56 44 Bytes

Eine Gruppenanstrengung jetzt.

'^'=mapply
sort(-sum^utf8ToInt^scan(,""))[1]

Probieren Sie es online!

In Codepunkte konvertieren, jedes Wort aufsummieren, negieren, (stabil) sortieren, erstes Element zurückgeben.

Technisch gesehen ist der Rückgabewert ein "benannter Vektor", dessen Wert die Summe und der Name das Gewinnerwort ist, aber dies scheint den Regeln zu folgen. Wenn Sie das gewinnende Wort als Zeichenfolge zurückgeben möchten, müssen Sie 7 weitere Bytes ausgeben und die obigen Zeilen einschließen names().

05AB1E , 8 Bytes

ð¡RΣÇO}θ

Probieren Sie es online!

Erläuterung

ð¡          # split input on spaces
  R         # reverse the resulting list
   Σ  }     # sort by
    ÇO      # sum of character codes
       θ    # take the last

JavaScript (ES6), 81 Byte

s=>s.split` `.map(m=s=>m=[...s].map(c=>t+=c.charCodeAt(),t=0)&&t<=m?m:(r=s,t))&&r

Probieren Sie es online!

jq, 61 43 57 37 Zeichen

( 57 39 53 33 Zeichen Code + 4 Zeichen Befehlszeilenoptionen)

./" "|reverse|max_by(explode|add)

Probelauf:

bash-4.4$ jq -Rr './" "|reverse|max_by(explode|add)' <<< 'àà as a test'
àà

Probieren Sie es online!

Pyth, 8 Bytes

h.MsCMZc

Testsuite

Ich weiß, dass es bereits eine Pyth-Antwort gibt, aber ich habe das Gefühl, dass dies eine ganz andere Herangehensweise verwendet _{^{und dass es auch kürzer ist}}

h.MsCMZc  | Full code
h.MsCMZcQ | with implicit variables added
----------+------------------------------------
h         | The first element of
       cQ | the input chopped at whitespace
 .M       | with the maximal value for
   s      | the sum of
    CMZ   | the Unicode value of each character

PowerShell , 74 52 Byte

(-split$args|sort{$r=0;$_|% t*y|%{$r+=$_};$r}-u)[-1]

Probieren Sie es online!

Danke an mazzy für die satten -22 Bytes.

-splits die Eingabe $argsauf Whitespace, leitet das sortmit einem bestimmten Sortiermechanismus{...} und der -uNique-Flagge.

Hier nehmen wir das aktuelle Wort $_, ändern es toCharArra yund fügen es dann für jeden Buchstaben in unser $rErgebnis ein. Dadurch wird die Zeichenfolge basierend auf der UTF-16-Darstellung in eine Zahl umgewandelt.

PowerShell mit UTF-16-Zeichenfolgen im Hintergrund ist ausnahmsweise ein Lebensretter!

Wir kapseln diese Ergebnisse dann ein, (...)um sie in ein Array umzuwandeln, und nehmen das letzte [-1], dh das größte Ergebnis, das dem Satzanfang am nächsten liegt. Dies funktioniert aufgrund des -uNique-Flags, dh wenn es ein späteres Element gibt, das denselben Wert hat, wird es verworfen. Dieses Wort bleibt in der Pipeline und die Ausgabe ist implizit.

Python 3 , 55 52 Bytes

lambda s:max(s.split(),key=lambda w:sum(map(ord,w)))

Probieren Sie es online!

• -3 Bytes Danke an Gigaflop für den Hinweis, dass in der splitMethode kein Argument benötigt wird.

MATLAB, 57 Bytes

s=strsplit(input('','s'));[Y I]=max(cellfun(@sum,s));s(I)

In meinem MATLAB R2016a sind alle Tests bestanden, außer dass Emojis nicht richtig gerendert werden. Zeichen werden jedoch korrekt zurückgegeben

Japt -h , 8 Bytes

@ Enigma Ansatz

¸w ñ_¬xc

Probieren Sie es online!

Ein anderer Ansatz

Japt -g , 8 Bytes

¸ñ@-X¬xc

Probieren Sie es online!

Java (JDK) , 117 97 84 Byte

-13 Bytes danke @Nevay. Anscheinend wusste ich nicht, dass ich es auch varin Java verwenden kann.

s->{var b="";for(var a:s.split(" "))b=a.chars().sum()>b.chars().sum()?a:b;return b;}

Probieren Sie es online!

Ruby, 45 Zeichen

->s{s.split.max_by{|w|w.codepoints.reduce:+}}

Probelauf:

irb(main):001:0> ->s{s.split.max_by{|w|w.codepoints.reduce:+}}['àà as a test']
=> "àà"

Probieren Sie es online!

Ruby 2.4, 40 Zeichen

->s{s.split.max_by{|w|w.codepoints.sum}}

(Ungetestet.)

Pyth , 33 Bytes

FHmCdmcd)Kczd aYu+GHmCdH0)@KxYeSY

Probieren Sie es online!

Es gibt mit ziemlicher Sicherheit einen besseren Weg, aber ich habe zu viel dafür ausgegeben, damit dies gelingt.

FH  #For every array of letters in 
  mCd   #the array of arrays of letters [['w', 'o', 'r', 'l', 'd'], ['h', 'e', 'l', 'l', 'o']]
     mcd)   #wrap that in another array [[hello"], ["world"]]
         Kczd   #split input(z) on spaces ["hello", "world"] and assign it to K for later
              aY     #append to list Y... " " silences the prints from the for loop.
                u+GH    #reduce the list of numbers by summing them    
                    mCdH    #convert each letter in the array to its int counterpart
                        0)    #the zero for the accumulator and close for loop
                          @K    #get by index the word from K
                            xY   #find the index in Y of that number
                              eSY   #sort Y, get the last (largest) number

Ich hätte ein Reduce in eine andere Map eingefügt, anstatt die for-Schleife zu verwenden, aber ich konnte das nicht zum Laufen bringen.

Holzkohle , 20 Bytes

≔⪪Ｓ θ≔ＥθΣＥι℅λη§θ⌕η⌈η

Probieren Sie es online! Link ist eine ausführliche Version des Codes. Erläuterung:

≔⪪Ｓ θ

Teilen Sie die Eingabezeichenfolge auf Leerzeichen und weisen Sie zu q.

≔ＥθΣＥι℅λη

Berechnen Sie die Summe der Ordnungszahlen der Zeichen in jedem Wort und weisen Sie zu h.

§θ⌕η⌈η

Suchen Sie den Index der höchsten Summe und drucken Sie das Wort an diesem Index.

Powershell, 66 Bytes

Einfach. Siehe AdmBorkBork ‚s Antwort eine intelligente Verwendung von Powershell zu gründen.

-split$args|%{$s=0
$_|% t*y|%{$s+=$_}
if($s-gt$x){$w=$_;$x=$s}}
$w

Hinweis! Speichern Sie Ihre Skriptdatei mit UTF-16oder , um die Arbeit mit Unicode zu korrigierenUTF8 with BOM Kodierung.

Testskript:

$f = {

-split$args|%{$s=0         # split argument strings by whitespaces, for each word
$_|% t*y|%{$s+=$_}         # let $s is sum of unicode char code
if($s-gt$x){$w=$_;$x=$s}}  # if $s greater then previous one, store word and sum to variables
$w                         # return word from stored variable

}

@(
    ,("a b c d e", "e")

    ,("hello world", "world")

    ,("this is a test", "test")

    ,("àà as a test", "àà")

    ,("α ää", "α")

    ,("🍬 隣隣隣", "隣隣隣")

    ,("💀 👻 🤡 🦇 🕷️ 🍬 🎃", "🕷️")
) | % {
    $s,$e=$_
    $r=&$f $s
    "$($r-eq$e): $r"
}

Ausgabe:

True: e
True: world
True: test
True: àà
True: α
True: 隣隣隣
True: 🕷️