名前のリストが指定されたときに、指定された名前の重複が姓の一意の短縮バージョンを持つリストを出力または返す関数またはプログラムを作成します。

入力：

名前のリスト。名前は、スペースで区切られた名と姓で定義されます。名前は、大文字と小文字のみを含む空でない文字列です。リストは、文字列の配列、または定数を非アルファ、非スペース文字で区切った名前にすることができますが、出力は入力と同じ形式である必要があります。

出力：

これらの規則によって変更された、入力と同じ順序および形式の入力された名前のリスト：

• 一意の名の場合、名のみを出力します
• 同じ名前を共有する名前の場合：
  • 彼らの名に加えて、別の名前と共有されていない姓の最も短い一意のバージョンを追加し、その後にピリオドを付けます。たとえば、次の John Clancy, John SmithようJohn C.,John S.にJames Brown, James BratteなりますJames Bro.,James Bra.
  • ある姓が別の姓のサブセットである場合（など）Julian King,Julian Kingsley、ピリオドなしの小さい姓の完全な姓を返します。例は次のようになりますJulian King,Julian King.
• 基本的には期間が正規表現を表し.+、唯一 1名がそれと一致している必要があります。
• あなたは誰も同じ名と同じ姓を共有しないと仮定するかもしれません
• 名前は大文字と小文字が区別されます

テストケース：

• John Clancy,Julie Walker,John Walker,Julie Clancy -> John C.,Julie W.,John W.,Julie C.
• Julian King,Jack Johnson,Julian Kingsley > Julian King,Jack,Julian King.
• Jack Brown,Jack Black,Jack Blue > Jack Br.,Jack Bla.,Jack Blu.
• John Storm,Jon Snow,Johnny Storm > John,Jon,Johnny
• Jill DeSoma,Jill Desmond > Jill DeS.,Jill Des.
• XxXnO sCOppeXxX,XxXNO MERCYXxX > XxXnO,XxXNO

これはcode-golfであるため、各言語の最小バイト数が優先されます。

ゼリー、 34 33 32  30 バイト

;\ċÐf⁶t€⁶;€JṖḊ$$¦”.µ€ċ@ÐṂ€Ẏ$Ḣ€

文字のリストのリスト（つまり「文字列」のリスト）を取り、同じ形式と相対順序で略語を返すモナドリンク。

オンラインでお試しください！（フルプログラムテストスイート）

どうやって？

;\ċÐf⁶t€⁶;€JṖḊ$$¦”.µ€ċ@ÐṂ€Ẏ$Ḣ€ - Link: list of lists    e.g. ["Sam Ng","Sam Li","Sue Ng"]
                   µ€          - monadically for €ach:  e.g. "Sue Ng"
 \                             -   cumulative reduce with:
;                              -     concatenation           ["S","Su","Sue","Sue ","Sue N","Sue Ng"]
     ⁶                         -   literal space character   ' '
   Ðf                          -   filter keep if:
  ċ                            -     count (spaces)          ["Sue ","Sue N","Sue Ng"]
        ⁶                      -   literal space character   ' '
      t€                       -   trim from €ach            ["Sue","Sue N","Sue Ng"]
                 ”.            -   literal period character  '.'
                ¦              -   sparse application...
         ;€                    -   ...of: concatenate €ach (with a period)
                               -   ...only for these indexes:
               $               -     last two links as a monad:
           J                   -       range of length       [1,2,3]
              $                -       last two links as a monad:
            Ṗ                  -         pop                 [1,2]
             Ḋ                 -         dequeue             [2]  (i.e. 2,3,...,length-1)
                               -   ...i.e.:                  ["Sue","Sue N.","Sue Ng"]
                               -                   yielding: [["Sam","Sam N.","Sam Ng"],["Sam","Sam L.","Sam Li"],["Sue","Sue N.","Sue Ng"]]
                           $   - last two links as a monad:
                          Ẏ    -   tighten                   ["Sam","Sam N.","Sam Ng","Sam","Sam L.","Sam Li","Sue","Sue N.","Sue Ng"]
                       ÐṂ€     -   filter keep minimals for €ach: 
                     ċ@        -     count (sw@ping args)    [["Sam N.","Sam Ng"],["Sam L.","Sam Li"],["Sue","Sue N.","Sue Ng"]]
                            Ḣ€ - head €ach                   ["Sam N.","Sam L.","Sue"]

Python 2、130バイト

def f(a):n=[[x[:i]+'.'*(' 'in x[:i]<x)for i in range(x.find(' '),len(x)+1)]for x in a];print[min(x,key=sum(n,[]).count)for x in n]

オンラインでお試しください！

最初に、次のようにすべてのニックネームを生成します。

n == [
    ['John', 'John .', 'John C.', 'John Cl.', 'John Cla.', 'John Clan.', 'John Clanc.', 'John Clancy'],
    ['Julie', 'Julie .', 'Julie W.', 'Julie Wa.', 'Julie Wal.', 'Julie Walk.', 'Julie Walke.', 'Julie Walker'],
    ['John', 'John .', 'John W.', 'John Wa.', 'John Wal.', 'John Walk.', 'John Walke.', 'John Walker'],
    ['Julie', 'Julie .', 'Julie C.', 'Julie Cl.', 'Julie Cla.', 'Julie Clan.', 'Julie Clanc.', 'Julie Clancy'],
    ['Jill', 'Jill .', 'Jill D.', 'Jill De.', 'Jill Des.', 'Jill Desm.', 'Jill Desmo.', 'Jill Desmon.', 'Jill Desmond']
]

次に、各リストからで最も頻度の低い最初の1つを選択しsum(n,[])ます。これは常に最初の一意のニックネームになります。

nには誤ったニックネーム'John .'などが含まれていますが、それらは選択されません。

（* CPython 2.7 minはとにかくそうします。このコードは移植できないかもしれません！）

Ruby 165162161160バイト

指定された名前のみが返される場合、末尾に1つのスペースが含まれます。 "John "

->a,n=0,s=0{a.group_by{|i|i[n]}.values.flat_map{|i|j=i[0];k=j.index' ';i.size<2?j.size>n ?j[0,[n+1,k].max-(s>1?0:1)]+(n>k ??.:''):j:f[i,n+=1,i.count{|l|l[n]}]}}

オンラインでお試しください！

末尾のスペースが必要ない場合は163バイト

->a,n=0,s=0{a.group_by{|i|i[n]}.values.flat_map{|i|j=i[0];k=j.index' ';i.size<2?j.size>n ?j[0..[n,k-1].max-(s>1?0:1)]+(n>k ??.: ''):j:f[i,n+1,i.count{|l|l[n+1]}]}}

オンラインでお試しください！