目的

ランダムサイズのマトリックス内の奇数文字を整理して返すプログラムまたは関数（または同等のもの）を作成します。

詳細

このようなランダムな次元の入力として（文字列として）マトリックスが渡されます。

bbbbbbbbbb
bbbbbdbbbb
bbbbbbbbbb
bbbbbbbbbb
bbbbbbbbbb

あなたの仕事は、残りと一致しない文字（この場合、d2行目、6桁目）を見つけ、その文字を出力として返すことです。マトリックスは、文字で構成されますA-Z、a-z、改行（\n、行のみの両端に）及び5×5から10×10までの範囲の大きさ（25〜100文字）を有します。

標準の抜け穴が適用されます。これはコードゴルフチャレンジです。最小バイトのコードを持つエントリが優先されます。

入力

入力は、プログラムの場合は文字列として、または関数（または同様の）の場合は引数として標準入力を介して渡されます。

出力

行列の「奇数」である単一の文字か None、nil、NUL、または文字列"None"なし「奇数」の文字が存在しない場合。

その他の例

AAAAAAA
AAAAAAA
AAAAAAA
AAAIAAA
AAAAAAA

回答： I

vvqvvvvvvv
vvvvvvvvvv
vvvvvvvvvv
vvvvvvvvvv
vvvvvvvvvv

回答： q

ぷうuuuuuuuu
ううううううううう
ううううううううう
ううううううううう
ううううううううう
ううううううううう
ううううううううう
ううううううううう
ううううううううう
ううううううううう

回答： p

発生器

Pythonで作成されたランダムマトリックスジェネレーターは、プログラムのテストに使用できます。注：ミスをして、奇妙な文字を入力しない可能性がわずかにあります。

Instructions

1. Copy this code into a file called `matrix_gen.py`.
2. Run it with `python matrix_gen.py`.

---

from random import randint

rows = randint(5,10)
cols = randint(5,10)

charset = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
neg = charset[randint(0,51)]
pos = charset[randint(0,51)]
p_used = 0

comp = 0
matrix = ""

while comp < rows:
  row = ""
  while len(row) < cols:
    if not p_used and not randint(0,10):
      p_used = 1
      row = row + pos
    else:
      row = row + neg
  row = row + "\n"
  matrix = matrix + row
  comp += 1

print matrix[:-1]

Python 3、27バイト

lambda x:min(x,key=x.count)

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

J、12 10 7バイト

-.}./.~

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

    /.~        Group identical items together
  }.           Remove one item from each group
-.             Remove the rest from the input

10バイトバージョン

-._1 1{\:~

^ヒス...

       \:~        Sort down
  _1 1{           Take the last character (which is a newline) and the second one.
-.                Remove those from the input

Brachylog、8 4バイト

oḅ∋≠

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

説明

Brachylogを使用したことがないので、これは最適ではないかもしれません。

oḅ∋≠  Input is a string.
o     Sort the input.
 ḅ    Split it into blocks of equal elements.
  ∋   There is a block
   ≠  whose elements are all different.
      That block is the output.

K（oK）、7 6バイト

解決

*<#:'=

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

例：

*<#:'="vvqvvvvvvv\nvvvvvvvvvv\nvvvvvvvvvv\nvvvvvvvvvv\nvvvvvvvvvv"
"q"

説明：

少し短いアプローチが見つかりました：右から左に評価：

*<#:'= / the solution
     = / group matching items together
  #:'  / count (#:) each (')
 <     / sort ascending
*      / take the first one

ノート：

私はこのチャレンジのボーナスの側面がドロップされることを期待していますが、この解決策は\n奇妙な文字がなければ改行文字を返します：

*<#:'="vvvvvvvvvv\nvvvvvvvvvv\nvvvvvvvvvv\nvvvvvvvvvv\nvvvvvvvvvv"
"\n"

プロローグ（SWI）、46バイト

p(L):-select(X,L,Y),\+member(X,Y),writef([X]).

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

または、プロローグクエリからの標準の真の出力に問題がある場合：

プロローグ（SWI）、48バイト

Z*L:-select(X,L,Y),\+member(X,Y),char_code(Z,X).

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

説明

Find the first element X in the input  
that when removed, results in output  
that does not contain X

then depending on the version above either:  
print X as a character  
or  
return X as an atom

C（gcc）、93 92 90 66 62バイト

関数としてはるかに短い

t;f(char*p){for(t=*p;*p;)t^*p++?putchar(*p^*--p?*p:t),*p=0:0;}

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

テストコード

main()
{
    char s[99];
    for(;gets(s);)f(s);
}

古いバージョンはプログラムです

C 86バイト

char*p;s[9];main(t){for(;p=gets(s);)for(t=*p;*p;)t^*p++?putchar(*p^*--p?*p:t),*p=0:0;}

奇数文字を出力するか、何も出力しません。このように実行します。

C:\eng\golf>python matrix_gen.py | a.exe
X
C:\eng\golf>python matrix_gen.py | a.exe
G
C:\eng\golf>python matrix_gen.py | a.exe
x
C:\eng\golf>python matrix_gen.py | a.exe

C:\eng\golf>python matrix_gen.py | a.exe
J

05AB1E、 4  2バイト

Adnanのおかげで2バイト節約

.m

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

説明

.m   # push a list of the least frequent character(s) in input

網膜、13バイト

s(O`.
(.)\1+

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

説明

s(O`.

すべての文字を並べ替えます。

(.)\1+

少なくとも2回現れる文字を削除します。

殻、2バイト

◄=

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

これは、入力として文字列を受け取り、文字を返す関数です。文字が等しいかどうかを比較するときに、入力文字列の最小値を使用します（つまり、他の文字の最小数に等しい文字を返します）。

C、94バイト

ポインターで戻る。存在しない場合、を返し\0ます。

これにより、メモリリークが発生します。想定intは4バイトです。

*t;f(c,p,i)char*c,*p;{t=calloc(64,8);for(*p=-1;*c;c++)t[*c]--;for(i=0;++i<128;)!~t[i]?*p=i:0;}

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

Mathematica、27バイト

Last@*Keys@*CharacterCounts

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

マーティン・エンダーから-1バイト

Bash、15 20バイト

fold -1|sort|uniq -u

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

説明： fold s 11行あたりの文字への入力、sorts一致する文字のグループへの入力、およびuniqueである行のみを出力します。

@Nahuel Fouilleul、このアプローチで問題を見つけて解決するのを手伝ってくれてありがとう

パイス、4バイト

ho/Q

ここで試してみてください！

Perl 5、17 + 3（-00p）-25％= 15バイト

/(.)\1/;s/
|$1//g

オンラインで試す

Matlab、25バイト

a=input('');a(a~=mode(a))

入力「a」。「a」は「a」のモードではありません。奇数ボールのない空の配列を出力します。

Haskell、33 * 0.75 = 24.75バイト

f s=[c|[c]<-(`filter`s).(==)<$>s]

奇数文字がない場合、空のリストを返します。

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

cマトリックス内の各文字（文字列として与えられるs）について、長さが1の文字sと等しいすべての文字の文字列を作成しますc。

JavaScript（ES6）、37バイト

null奇数文字がない場合に返します。

s=>s.match(`[^
${s.match(/(.)\1/)}]`)

テストケース

let f =

s=>s.match(`[^
${s.match(/(.)\1/)}]`)

console.log(f(
  'bbbbbbbbbb\n' +
  'bbbbbdbbbb\n' +
  'bbbbbbbbbb\n' +
  'bbbbbbbbbb\n' +
  'bbbbbbbbbb'
))

console.log(f(
  'AAAAAAA\n' +
  'AAAAAAA\n' +
  'AAAAAAA\n' +
  'AAAIAAA\n' +
  'AAAAAAA'
))

console.log(f(
  'vvqvvvvvvv\n' +
  'vvvvvvvvvv\n' +
  'vvvvvvvvvv\n' +
  'vvvvvvvvvv\n' +
  'vvvvvvvvvv'
))

console.log(f(
  'puuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu\n' +
  'uuuuuuuuu'
))

console.log(f(
  'AAAAA\n' +
  'AAAAA\n' +
  'AAAAA\n' +
  'AAAAA\n' +
  'AAAAA'
))

Japt、6バイト

入力を複数行の文字列として受け取り、単一の文字列を出力します。解決策がない場合は空の文字列を出力します。

k@èX É

それを試してみてください

説明

入力内の現在の要素（）の出現をカウント（）し、1（）を減算kする関数（@）を通過したときに、真理値（）を返す文字を削除します。èXÉ

Common Lisp、47バイト

(lambda(s)(find-if(lambda(x)(=(count x s)1))s))

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

奇数の文字または存在しない場合はNILを返します。

ゼリー、4バイト

ċ@ÐṂ

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

\n奇数文字がない場合に（単一の改行）を返します。明らかに\n印刷可能なキャラクターではありません。

偶然にも、これはMr.Xcoder Pythonの答えとまったく同じアルゴリズムです。（私はそれを独自に思いついた）

説明：

  ÐṂ    Ṃinimum value by...
ċ@      ċount. (the `@` switch the left and right arguments of `ċ`)

それが機能するのは、m×nマトリックス内で：

• 奇妙な文字が存在する場合：ありm-1改行、1つの奇数文字とm×n-1通常の文字は、および1 < m-1 < m×n-1理由5 ≤ m, n ≤ 10。
• 奇妙な文字が存在しない場合：m-1改行とm×n通常の文字がありm-1 < m×nます。

C＃（.NET Core）、54バイト

i=>i.GroupBy(x=>x).FirstOrDefault(g=>g.Count()<2)?.Key

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

C（gcc）、91 86 82 79 71バイト

f(char*s){for(;*++s==10?s+=2:0,*s;)if(*s^s[-1])return*s^s[1]?*s:s[-1];}

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

• xorと？についてGastropnerに感謝します。トリック（-3バイト）
• 比較バージョンを修正してバグを修正し、コメントからGastropnerマジックを使用しました。

説明：

改行をスキップしながら、現在の文字と前の文字を比較します。異なる場合は、次の文字と比較してください。これは、現在の文字を返すか前の文字を返すかを示します。関数は、存在する場合は「奇数」文字値を返し、配列が奇数でない場合は0を返します。\0charの前には常に改行があるため、「次の」charチェックを回避します。奇数のcharがない場合、forループから\ 0を本質的に返します。

古い、よりセクシーなXORコード説明：

次の3つの文字列値の実行中のxorマスクを作成します。それらがすべて同じ場合、値は3つのいずれかに等しくなります。それらが異なる場合、2つの同一のものは互いにキャンセルし、一意のものを残します。

xorの前に/ nを因数分解する必要があります。そうしないと、混乱します。また、s [0]が奇数値の場合は、2文字の不等式をチェックする必要があります。これには余分な費用がかかります|| 小切手。

v;f(char*s){while(s[3]){s[2]==10?s+=3:0;v=*s^s[1]^s[2];if(v^‌​*s++||v^*s)break;}}

オクターブ、26 25バイト

@Giuseppeのおかげで1バイト節約

@(x)x(sum(x(:)==x(:)')<2)

2D char配列を入力として受け取り、奇数文字または存在しない場合は空の文字列を出力する匿名関数。

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

アリス、16 * 75％= 12バイト

/-.nDo&
\i..*N@/

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

Jabberwocky重複する文字がない場合に出力します。

説明

/...@
\.../

これは、完全に順序（文字列処理モード）で動作する線形プログラムのフレームワークです。実際のコードはジグザグに実行され、次のように展開されます。

i..DN&-o

i   Read all input.
..  Make two copies.
D   Deduplicate one copy, giving only the two letters and a linefeed.
N   Multiset difference. Removes one copy of each letter and one linefeed.
    Therefore it drops the unique letter.
&-  Fold substring removal over this new string. This essentially removes
    all copies of the repeated letter and all linefeeds from the input,
    leaving only the unique letter.
.   Duplicate.
n   Logical NOT. Turns empty strings into "Jabberwocky" and everything else
    into an empty string.
*   Concatenate to the previous result.
o   Print the unique letter or "Jabberwocky".

の代わりに&-、ey（空の文字列への音訳）も使用できます。または、スタック操作にもう1文字を費やすことで、入力を重複排除して、で不要な文字を削除することもできますNが、それでも同じバイトカウントです。

i.D.QXN.n*o@

アリス、13バイト

/N.-D@
\i&.o/

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

これはボーナスなしのソリューションで、単に欠落してい.n*ます。

網膜、22バイト

!`(.)(?!.*\1)(?<!\1.+)

オンラインでお試しください！5ではなく、少なくとも3の高さと幅のみが必要です。

APL + WIN、16バイト

(1=+/a∘.=a)/a←,⎕

画面入力を要求し、奇数文字が出力されるか、奇数文字がない場合は何も出力されません。

PowerShell、39バイト

([char[]]"$args"|group|sort c*)[0].Name

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

入力を（チャレンジで指定された）改行を含む文字列として受け取り、char-arrayに変換します。次にGroup-Object、キャラクターが名前によってグループ化され、その後、名前にsort基づいてグループ化されるようにしますc。これにより、孤独な文字が最初になることが保証されるため、[0]インデックスを取得してそのを出力し.Nameます。

改行が「nothing」に受け入れられる場合、これはボーナスの対象となります。

Perl 6の、 27  24 -25％= 18バイト

*.comb.Bag.min(*.value).key

試して

{%(.comb.Bag.invert){1}}

試して

奇数の文字が入力されていない場合、これは未定義の値を返します。

拡張：

{  # bare block lambda with implicit parameter ｢$_｣

  %(        # coerce into a Hash

    .comb   # split the input into graphemes (implicit method call on ｢$_｣)
    .Bag    # turn into a weighted Set
    .invert # invert that (swap keys for values) returns a sequence

  ){ 1 }    # get the character that only occurs once
}

Brainfuck、125バイト

,[----------[>],]<[->+<]<<[[->->+<<]>[>[->-<<<+>>]>[,<<,>>]<<<[->+<]>[->+<]<]>[-<<+>>]>[-<+>]<<<<]>>>>[<]<++++++++++.

オンラインで試す

奇数がなければ行列の文字を印刷します

Java 8、85バイト

これはStringto からのラムダですString（例Function<String, String>）。これは本質的にLucaのソリューションのコピーですが、文字列の並べ替えを少し減らしました。

s->new String(s.chars().sorted().toArray(),0,s.length()).replaceAll("(.)\\1+|\\n","")

オンラインで試す