Objektif

Tujuan Anda adalah membuat program yang mengubah input ke akronimnya. Masukan Anda dijamin hanya memiliki huruf dan spasi. Input akan memiliki tepat satu spasi di antara kata-kata. Anda harus menampilkan akronim dari input.

Aturan

• Kode Anda tidak boleh peka huruf besar-kecil (mis. fooDan Foosama)
• Kode Anda harus mengabaikan kata-kata berikut dan tidak menempatkannya dalam akronim: and or by of
• Anda tidak dapat berasumsi bahwa kata-katanya semua huruf kecil.
• Keluaran harus sepenuhnya ditulis dalam huruf kapital, tanpa pemisahan antara karakter.
• Newline tambahan diterima tetapi tidak perlu.
• Jika bahasa Anda memiliki fungsi akronim bawaan, Anda mungkin tidak menggunakannya.

Contohnya

(input / output dikelompokkan)

United States of America
USA

Light Amplification by Stimulation of Emitted Radiation
LASER

united states of america
USA

Jordan Of the World
JTW

Mencetak gol

Ini adalah tantangan kode-golf sehingga kode terpendek menang.

Papan peringkat

var QUESTION_ID=75448,OVERRIDE_USER=8478;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Pyth, 25 21 20 byte

shM-crz1dc4."@YK½¼

Coba di sini!

Terima kasih kepada @Jakube karena telah menghemat satu byte!

Penjelasan

shM-crz1dc4. "@ YK½¼ # z = input

     rz1 # ubah input menjadi huruf besar
    masukan masukan cd # pada spasi
         c4. "@ YK½¼ # buat daftar kata-kata dari string yang dikemas yang akan diabaikan
   - # saring kata-kata itu
 hM # hanya mengambil huruf pertama dari semua kata
s # gabungkan mereka menjadi satu string

String yang dikemas menjadi ANDBYOROF

Jelly , 21 20 byte

,“°ɲịĊs°gɗ»ṣ€⁶Œuḟ/Ḣ€

Cobalah online!

(-1 terima kasih kepada @Dennis.)

,“°ɲịĊs°gɗ»              Pair input with the string "OR OF by AND"
           ṣ€⁶           Split both by spaces
              Œu         Uppercase
                ḟ/       Reduce filter (removing ignored words from input)
                  Ḣ€     Keep first letters of remaining words

Kamus Jelly agak aneh karena memiliki ANDhuruf besar namun bydalam huruf kecil ...

Retina, 29 31 36 byte

T`l`L
 |(AND|OR|BY|OF)\b|\B.

Dimaksudkan baris baru di akhir.

Terima kasih kepada Martin Büttner karena telah menghemat 5 byte

Cobalah online

T`l`L                  # Replace lowercase with uppercase
 |(AND|OR|BY|OF)\b|\B. # Regex match, it doesn't matter if we match 'AND' in SHAND
                       #   since the 'SH' will still become 'S' or am I missing something?
                       # Replace with nothing

JavaScript (ES6), 56 byte

Menyimpan satu byte berkat @ edc65.

s=>s.toUpperCase().replace(/\B.| |(AND|O[RF]|BY)\b/g,"")

Penjelasan

Kode ini cukup jelas, saya hanya akan menjelaskan regex:

\B.          // Matches any character (`.`), that's not the start of a word
|            // Matches spaces
|(...)\b     // Matches all the words that should be ignored

Itu menghapus semua karakter yang cocok ini dan huruf besar kata

JavaScript, 61 64 66 63 byte

a=>a.toUpperCase().replace(/(AND|O[FR]|BY|(\w)\w+)( |$)/g,"$2")

Ini menggunakan Ekspresi Reguler untuk menemukan kata-kata yang bukan dari daftar and, or, of, by:, dan menangkap huruf pertama. Ini kemudian memanfaatkan huruf yang dihasilkan string.

EDIT: 64 Bytes - Memperbaiki kata mulai denganof,or,by,and

EDIT: 66 Bytes - Tetap untuk memeriksa semua kata termasuk kata terakhir.

EDIT: 63 Bytes - Disimpan 3 Bytes berkat @ edc65 dan @Cyoce !

vim, 46

gUU:s/ /\r/g<cr>:g/\vAND|OR|OF|BY/d<cr>:%s/.\zs.*\n<cr>

gUU                      make line uppercase
:s/ /\r/g<cr>            replace all spaces with newlines
:g/\vAND|OR|OF|BY/d<cr>  remove unwanted words
:%s/.\zs.*\n<cr>         remove all non-initial characters and newlines

Saya sangat menyukai bagian terakhir itu. Yang pertama .di regex cocok dengan karakter pertama dari baris. Kemudian kita gunakan \zsuntuk memulai bagian "sebenarnya sedang diganti", secara efektif tidak menggantikan karakter awal. .*cocok dengan sisa baris, dan \ncocok dengan baris tambahan. Karena kami tidak menentukan string pengganti, vim hanya menghapus semua yang ada dalam pertandingan, hanya menyisakan inisial.

CJam, 28 24 22 byte

qeuS/"AOBONRYFD"4/z-:c

Cobalah online . Terima kasih kepada Sp3000 karena menunjukkan bug dan menyarankan perbaikan, dan kepada Dennis untuk menyimpan 4 6 (!) Byte.

Penjelasan

qeuS/  e# Convert the input to uppercase and split on spaces
"AOBONRYFD"4/z  e# Push the array of short words. See more below
-      e# Remove each short word from the input words
:c     e# Cast the remaining words to characters, which is a
       e# shorter way of taking the first letter

Dennis menyarankan trik ini untuk memperpendek daftar kata: Kita bagi AOBONRYFDmenjadi empat bagian, kita dapatkan

AOBO
NRYF
D

Memindahkan kolom ke dalam baris dengan z operator, kami mendapatkan kata-kata yang tepat!

Julia, 72 63 61 55 byte

s->join(matchall(r"\b(?!AND|OR|OF|BY)\S",uppercase(s)))

Ini adalah fungsi anonim yang menerima string dan mengembalikan string. Untuk menyebutnya, tetapkan ke variabel.

Kami mengonversi string menjadi uppercase, memilih setiap kecocokan dari ekspresi reguler \b(?!AND|OR|OF|BY)\Ssebagai array, danjoin itu menjadi string.

Disimpan 8 byte berkat Dennis!

Perl, 32 byte

say uc=~/\b(?!AND|OR|OF|BY)\S/g

+1 byte untuk -n bendera.

Algoritma dicuri dari jawaban @A AlexA .

Ruby, 45 43 byte

->s{s.upcase.scan(/\b(?!AND|OR|OF|BY)\S/)*''}

Ini adalah fungsi lambda yang menerima string dan mengembalikan string. Untuk menyebutnya, tetapkan ke variabel dan lakukan f.call(input).

Ini menggunakan pendekatan yang sama dengan jawaban Julia saya , yaitu dikonversi ke huruf besar, dapatkan kecocokan dari ekspresi reguler \b(?!AND|OR|OF|BY)\S, dan bergabung menjadi string.

Coba di sini

Disimpan 2 byte berkat manatwork!

PHP, 92 byte

Usaha pertama di kode golf.

foreach(explode(" ",str_replace(["AND","OR","BY","OF"],"",strtoupper($s)))as$x){echo$x[0];}

Variabel $sadalah frase yang akan dikonversi: $s = "United States of America".

Membutuhkan PHP 5.4 atau lebih tinggi untuk sintaks array pendek agar berfungsi.

Bash + GNU coreutils, 103 76 byte

for i in ${@^^};do grep -qE '\b(AND|OR|BY|OF)\b'<<<$i||echo -n ${i:0:1};done

Jalankan dengan

./codegolf.sh Light Amplification BY Stimulation of Emitted Radiationofo

baik dengan argumen tunggal yang dikutip atau dengan banyak argumen.

(Saya terdistorsi kata terakhir mengandung dari ).

60 byte

Terima kasih kepada @manatwork.

for i in ${@^^};{ [[ $i = @(AND|OR|BY|OF) ]]||printf %c $i;}

JavaScript, 104 85 byte

Disimpan 19 byte berkat @ Aplet123 .

Pisahkan string dengan spasi kemudian periksa apakah itu kata-kata, atau, dan, atau oleh. Jika ya, ia mengabaikannya, jika tidak maka ia harus huruf pertama. Kemudian bergabung dengan array dan membuat string huruf besar.

a=_=>_.split` `.map(v=>/\b(o(f|r)|and|by)\b/i.test(v)?"":v[0]).join("").toUpperCase()

Tidak Disatukan:

function a(_) {
       _ = _.split` `; //Split on spaces
       _ = _.map(function(v){return new RegExp("\b(o(f|r)|and|by)\b","i").test(v)}); //Check if the banned words are in the result
       _ = _.join(""); //Join it into a string
       _ = _.toUpperCase(); //Convert it to uppercase
};

MATL , 34 27 byte

1 byte lebih sedikit berkat @AndN

KkYb'OF AND OR BY'YbX-c1Z)!

Cobalah online!

Xk                  % convert to uppercase
Yb                  % split by spaces. Gives a cell array of input words
'AND OR BY OF'      % ignored words separated by spaces
Yb                  % split by spaces. Gives a cell array of ignored words
X-                  % setdiff: remove ignored words (result is stable)
c                   % convert to 2D char array, padding words with spaces
1Z)                 % take first column
!                   % transpose into a row

05AB1E , 33 32 28 byte

Kode:

‘€ƒ€—€‚€‹‘ð¡)Uuð¡)vXyQO>iy¬?

Menggunakan pengodean CP-1252 .

Python, 81 byte

lambda s:''.join(c[0]for c in s.upper().split()if c not in'AND OF OR BY'.split())

Haskell, 100 99 98 82 75 bytes

Saya cukup yakin ini bisa dipersingkat lebih banyak karena saya masih payah dalam menggunakan $, .dll. Jadi saya tetap menggunakan ()insted =)

Terima kasih @nimi untuk sihir bantuan Anda!

import Data.Char
w=words
x=[h!!0|h<-w$toUpper<$>x,notElem h$w"OF BY OR AND"]

Contoh:

*Main> a "united states by america"
"USA"

Python, 103 96 byte

Ini adalah upaya pertama saya di golf kode, dan ini mungkin bisa lebih banyak golf. Terima kasih kepada DenkerAffe karena telah menyimpan tujuh karakter.

lambda x:"".join([x[0]for y in x.split(" ") if y.lower() not in ['and','or','of','by']]).upper()

Dibutuhkan input, mengubahnya menjadi daftar kata dan mengambil huruf pertama mereka jika itu bukan salah satu kata terlarang, kemudian mengubah semuanya menjadi huruf besar.

JavaScript, 80 72 55 53 byte

Kode

function a(t){t=t.toUpperCase();t=t.replace(/AND|OR|BY|OF|\B.| |/g,"");return t}

function a(t){return t.toUpperCase().replace(/AND|OR|BY|OF|\B.| |/g,"")}

Saya baru saja membaca tentang fungsi panah dan menyadari bahwa saya dapat mempersingkat ini lebih jauh.

a=t=>t.toUpperCase().replace(/AND|OR|BY|OF|\B.| |/g,"")

Menurut ini , Anda tidak menghitung tugas dalam panjangnya, jadi -2 byte.

t=>t.toUpperCase().replace(/AND|OR|BY|OF|\B.| |/g,"")

Ini golf pertama saya, jadi tidak terlalu bagus.

PHP, 68 61 58 byte

Menggunakan penyandian ISO-8859-1.

for(;$w=$argv[++$x];)stripos(_AND_OR_BY_OF,$w)||print$w&ß;

Jalankan seperti ini ( -dditambahkan hanya untuk estetika):

php -d error_reporting=30709 -r 'for(;$w=$argv[++$x];)stripos(_AND_OR_BY_OF,$w)||print$w&ß; echo"\n";' united states oF america

Tidak Disatukan:

// Iterate over the CLI arguments (words).
for(;$w = $argv[++$x];)
    // Check if the word is one of the excluded words by substring index.
    // The check is case insensitive.
    stripos("_AND_OR_BY_OF", $w) ||
        // Print the word, converting to uppercase and getting only the
        // first char by using bitwise AND.
        print $w & "ß";

• Disimpan 7 byte dengan menggunakan bitwise DAN bukannya menggunakan ucwords .
• Disimpan 3 byte dengan menggunakan pengkodean ISO-8859-1 dan menggunakan ß(biner 11011111) untuk biner ANDalih-alih ruang dinegasikan (biner 00100000).

Mathematica, 132 117 byte

ToUpperCase[First/@Characters@DeleteCases[StringDelete[StringSplit@#,"of"|"and"|"or"|"by",IgnoreCase->True],""]<>""]&

15 byte disimpan berkat @CatsAreFluffy.

PowerShell, 81 Bytes

(-join($args[0].Split(" ")|?{$_-notmatch"^(and|or|by|of)$"}|%{$_[0]})).ToUpper()

Penjelasan

Berpisah pada spasi membuat array. Jatuhkan anggota yang menyinggung. Tarik karakter pertama dan bergabunglah bersama. Gunakan ToUpper()pada string yang dihasilkan.

Lua, 122 Bytes

Saya ingin sekali menggunakan pola untuk menghilangkan kata-kata yang dilarang, tetapi sayangnya, lua tidak dibuat untuk mencocokkan grup karakter ... Jadi saya harus menggunakan for for loop, yang jauh lebih mahal.

s=arg[1]for k,v in next,{"of","and","by","or"}do
s=s:gsub(v,"")end
print(s:gsub("(%a)%a+",string.upper):gsub("%s","").."")

Tidak disatukan

s=arg[1]                               -- initialise s with the argument
for k,v in next,{"of","and","by","or"} -- iterate over the array of banned words
do
    s=s:gsub(v,"")                     -- replace the occurences of v by 
end                                    --   an empty string
print(s:gsub("(%a)%a+",                -- replace words (separated by spaces)
              string.upper)            -- by their first letter capitalised
         :gsub("%s","")                -- replace spaces with empty strings
                       .."")           -- concatenate to prevent the number of 
                                       -- substitutions to be shown

Faktor, 175 byte

Saya belajar banyak dengan menulis ini.

USING: strings ascii sets splitting kernel sequences math.ranges ;
>lower " " split [ { "and" "or" "by" "of" } in? not ] filter [ first dup [a,b] >string ] map "" join >upper 

Sebagai sebuah kata:

USING: strings ascii sets splitting kernel sequences math.ranges ;

: >initialism ( str -- str )
  >lower " " split                            ! string.lower.split(" ")
  [ { "and" "or" "by" "of" } in? not ] filter ! word in { } ?
  [ first dup [a,b] >string ]          map    ! word[0]
  "" join >upper ;                            ! "".join.upper

Tes unit:

USING: tools.test mk-initialism ;
IN: mk-initialism.tests

{ "LASER" } [ "Light Amplification by Stimulation of Emitted Radiation" >initialism ] unit-test
{ "USA"   } [ "United States OF Americaof" >initialism ]                              unit-test
{ "USA"   } [ "united states and america" >initialism ]                               unit-test
{ "JTW"   } [ "Jordan Of the World" >initialism ]                                     unit-test

Lulus!

Lua, 113 112 93 bytes

arg[1]:upper():gsub("%w+",function(w)io.write(("AND OR BY OF"):find(w)and""or w:sub(0,1))end)

C #, 134 byte

Golf

class P{static void Main(string[] a){foreach (var s in a){if(!"AND OR BY OF".Contains(s.ToUpper())){Console.Write(s.ToUpper()[0]);}}}}

Dapat dibaca

class P
{
    static void Main(string[] a)
    {
        foreach (var s in a)
        {
            if (!"AND OR BY OF".Contains(s.ToUpper()))
            {
                Console.Write(s.ToUpper()[0]);
            }
        }
    }
}

Jalankan dari baris perintah

75448.exe Amplifikasi Cahaya dengan Stimulasi Radiasi yang Dipancarkan

LASER

75448.exe Amerika Serikat

Amerika Serikat

IPOS - tidak bersaing, 27 byte

uS`"AND|OR|BY|OF"ER`%S!h%S-

Ini berfungsi dalam versi saat ini (v0.2) dari juru bahasa .

Contoh dijalankan

python IPOS.py -i "Amerika Serikat" uS` \ "DAN | ATAU | DENGAN | DARI \" ER`% S! h% S-
Amerika Serikat

Garis miring terbalik hanya ada untuk lolos dari kutipan dan tidak diperlukan untuk program.

Penjelasan

u # Buat input huruf besar
S # Dorong spasi ke tumpukan
`" AND | OR | BY | OF "ER` # Dorong perintah ke stack, yang menggantikan kecocokan regex
                   # dengan string kosong
% # Membagi string input huruf besar pada spasi, menerapkan perintah dan
                   # Bergabung kembali di spasi. Ini menghilangkan kata-kata yang diperlukan dari input.
S # Dorong spasi ke tumpukan
! h # Dorong perintah yang hanya memilih karakter pertama dari sebuah string
% # Membagi spasi, menerapkan perintah dan bergabung kembali pada spasi
S- # Hapus ruang yang tersisa (lupa untuk membuat ini dapat digunakan
                   # dengan regex, akan menyelamatkan saya beberapa byte di sini :()

bash / GNU coreutils, 60 byte

sed -e's/\b'{and,o[rf],by}'\W*//Ig' -re's/(\w)\S* ?/\u\1/g'

Pylongolf2 , 14 byte (UTF-8)

c| l1╨3♀~

Pylongolf2 memiliki banyak karakter non-ASCII yang dihitung sebagai 2 byte.

c| l1╨3♀~
c         read input
 |        split by space (note the space after |)
   l1     substring(0, 1)
     ╨3   convert to uppercase
       ♀~ pop the array into the stack and print it.

05AB1E , 19 byte (tidak bersaing ...?)

lð¡“€ƒ€—€‹€‚“#K€нJu

Cobalah online!

Versi yang pasti bersaing (21 byte):

lð¡“€ƒ€—€‹€‚“#Kvy0èuJ

Cobalah online!