String Sum Tertinggi

Diberikan string input, kembalikan kata dengan jumlah tertinggi dari setiap karakter unicode-nya.

Aturan

• Input harus dipisahkan oleh spasi putih
• Nilai setiap kata didasarkan pada jumlah setiap karakter dalam kode UTF-16 kata tersebut
• Output harus kata pertama dengan nilai tertinggi (dalam hal jumlah duplikat)

Contohnya

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: "🕷️"

Ini kode golf, jadi jawaban tersingkat menang! Semoga berhasil :)

Jelly , 7 byte

ḲOS$ÐṀḢ

Cobalah 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 byte

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

Cobalah online!

R , 77 69 59 58 56 44 byte

Upaya kelompok sekarang.

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

Cobalah online!

Konversikan ke poin kode, jumlah setiap kata, negate, sortir, kembalikan elemen pertama.

Secara teknis nilai kembali adalah "vektor bernama" yang nilainya adalah jumlah dan nama adalah kata yang menang, tetapi ini tampaknya mengikuti aturan. Jika Anda ingin mengembalikan kata yang menang sebagai string, Anda harus menghabiskan 7 byte lebih dan membungkusnya di atas names().

05AB1E , 8 byte

ð¡RΣÇO}θ

Cobalah online!

Penjelasan

ð¡          # 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

Cobalah online!

jq, 61 43 57 37 karakter

( 57 39 53 33 karakter kode + 4 opsi opsi baris perintah)

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

Contoh dijalankan:

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

Cobalah online!

Pyth, 8 byte

h.MsCMZc

Suite uji

Saya tahu sudah ada jawaban Pyth tapi saya merasa seperti ini menggunakan pendekatan yang sangat berbeda _{^{dan juga lebih pendek}}

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]

Cobalah online!

Berkat mazzy untuk -22 byte kekalahan.

-splitS input $argspada spasi putih, pipa yang ke sortdengan mekanisme penyortiran tertentu {...}dan -ubendera unik.

Di sini kita mengambil kata saat ini $_, mengubahnya toCharArra y, lalu untuk setiap huruf kita menambahkannya ke kita$r esult . Itu mengubah string menjadi angka berdasarkan pada representasi UTF-16.

Untuk sekali ini, PowerShell memiliki semua string menjadi UTF-16 di latar belakang adalah penyelamat hidup!

Kami kemudian merangkum hasil-hasil itu (...)untuk mengubahnya menjadi sebuah array dan mengambil yang terakhir [-1], yaitu, hasil terbesar yang paling dekat dengan awal kalimat. Ini berfungsi karena -ubendera nique, yaitu, jika ada elemen kemudian yang memiliki nilai yang sama, itu dibuang. Kata itu ditinggalkan di jalur pipa dan hasilnya tersirat.

Python 3 , 55 52 byte

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

Cobalah online!

• -3 byte terima kasih kepada Gigaflop untuk menunjukkan bahwa tidak ada argumen yang diperlukan dalam splitmetode ini.

MATLAB, 57 byte

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

Dalam MATLAB R2016a saya semua tes dilewati, kecuali bahwa emoji tidak ditampilkan dengan benar. Tetapi karakter dikembalikan dengan benar

Japt -h , 8 byte

@ Pendekatan Enigma

¸w ñ_¬xc

Cobalah online!

Pendekatan Lain

Japt -g , 8 byte

¸ñ@-X¬xc

Cobalah online!

Java (JDK) , 117 97 84 byte

-13 byte terima kasih @Nay. Rupanya saya tidak tahu saya juga bisa menggunakan vardi Jawa.

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

Cobalah online!

Ruby, 45 karakter

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

Contoh dijalankan:

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

Cobalah online!

Ruby 2.4, 40 karakter

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

(Belum dicoba.)

Pyth , 33 byte

FHmCdmcd)Kczd aYu+GHmCdH0)@KxYeSY

Cobalah online!

Hampir pasti ada cara yang lebih baik untuk melakukan ini, tetapi saya menghabiskan terlalu banyak untuk itu sehingga ini bisa dilakukan.

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

Saya akan memberikan pengurangan ke peta lain alih-alih menggunakan for for loop, tapi saya tidak bisa membuatnya bekerja.

Arang , 20 byte

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

Cobalah online! Tautan adalah untuk mengucapkan versi kode. Penjelasan:

≔⪪Ｓ θ

Pisahkan string input pada spasi dan tetapkan ke q.

≔ＥθΣＥι℅λη

Hitung jumlah tata cara karakter di setiap kata dan tetapkan h.

§θ⌕η⌈η

Temukan indeks jumlah tertinggi dan cetak kata di indeks itu.

Powershell, 66 byte

Mudah. Lihat jawaban AdmBorkBork untuk menemukan penggunaan Powershell yang cerdas.

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

Catatan! Untuk memperbaiki pekerjaan dengan unicode, simpan file skrip Anda dengan UTF-16atau UTF8 with BOMpenyandian.

Skrip uji:

$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"
}

Keluaran:

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