Diberikan (pada STDIN, sebagai argumen baris perintah, atau sebagai argumen fungsi) dua string non-kosong yang berbeda, temukan dan kembalikan substring terpendek dari string pertama yang bukan merupakan substring dari string kedua. Jika tidak ada substring seperti itu, Anda dapat mengembalikan string kosong, mengembalikan string apa pun yang bukan substring dari string asli, atau melempar pengecualian. Jika Anda kembali dari suatu fungsi, Anda juga dapat mengembalikan nol (atau tidak ditentukan, Tidak ada, dll.) Dalam kasus ini. Jika beberapa substring terikat untuk yang terpendek, Anda dapat mengembalikan salah satunya.

String dapat terdiri dari karakter ascii yang dapat dicetak.

Input yang diberikan pada STDIN akan diberikan dengan satu string pada setiap baris. Atas permintaan Anda, satu baris kosong dapat ditambahkan di akhir input.

Ini adalah kode golf, sehingga program yang paling singkat yang valid menang.

BEBERAPA KASUS UJI

MEMASUKKAN:

STRING ONE
STRING TWO

KELUARAN:

E

MEMASUKKAN:

A&&C
A&$C

OUTPUT YANG LUAR BIASA:

&&
&C

MEMASUKKAN:

(Dua string 80-huruf yang dihasilkan secara acak)

QIJYXPYWIWESWBRFWUHEERVQFJROYIXNKPKVDDFFZBUNBRZVUEYKLURBJCZJYMINCZNQEYKRADRYSWMH
HAXUDFLYFSLABUCXUWNHPSGQUXMQUIQYRWVIXGNKJGYUTWMLLPRIZDRLFXWKXOBOOEFESKNCUIFHNLFE

SEMUA OUTPUT YANG VALID:

AD
BJ
BR
CZ
DD
EE
ER
EY
EY
FF
FJ
FW
FZ
HE
IJ
IN
IW
JC
JR
JY
KL
KP
KR
KV
LU
MH
MI
NB
NQ
OY
PK
PY
QE
QF
QI
RA
RB
RF
RO
RV
RY
RZ
SW
UE
UH
UN
UR
VD
VQ
VU
WB
WE
WI
WU
XN
XP
YI
YK
YK
YM
YS
YW
YX
ZB
ZJ
ZN
ZV

Brachylog , 23 byte

:1foh.,{,.[A:B]hs?'~sB}

Bekerja pada transpiler Java lama. Mengharapkan dua string dalam daftar sebagai input, menyatukan output dengan substring. Jika tidak ada substring yang ditemukan, mengembalikan false.

Sayangnya saya belum memberi kode subset built-in di Prolog transpiler baru.

Penjelasan

:1f               Find all bindings which satisfy predicate 1 with that binding as input and
                  with the Input of the main predicate as output.
   oh.,           Order that list of bindings, and unify the output with the first one.

{
 ,.[A:B]          Unify the output with the list [A,B]
        hs?       Unify the input with a subset of A
           '~sB   Check that no subset of B can be unified with the input
               }

Python, 119 115 91

lambda a,b:[a[m:m+n]for n in range(1,len(a)+1)for m in range(len(a))if a[m:m+n]not in b][0]

Kasus uji:

| Input 1  | Input 2     | Output        |
|----------+-------------+---------------|
| 'abcd'   | 'abc'       |  'd'          |
| 'abcd'   | 'dabc'      |  'cd'         |
| 'abcd'   | 'dcbabbccd' |  'abc'        |
| 'abcdf'  | 'abcdebcdf' |  'abcdf'      |
| 'abc'    | 'abc'       |  (IndexError) |

Berusaha membuatnya lebih pendek, tapi ini naluri otakku. Belum terlalu pegolf.

Terima kasih kepada @ user81655 dan @NlinlinearFruit untuk byte ekstra.

Edit :

Dang. Mencoba kode ini:

def z(a,b):
 for s in [a[m:m+n]for n in range(1,len(a)+1)for m in range(len(a)-n+1)]:
  if s not in b:return s
 return''

Kupikir itu beberapa byte lebih pendek. Ternyata itu 1 byte lebih lama dari apa yang saya miliki sebelum edit.

Python, 87 86 byte

lambda s,t,e=enumerate:[s[i:i-~j]for j,_ in e(s)for i,_ in e(s)if(s[i:i-~j]in t)<1][0]

Jika ada, ini akan mengembalikan substring unik terpendek ke kiri.

Jika tidak ada substring unik, sebuah IndexError dinaikkan.

Uji di Ideone .

Python, 82 byte

g=lambda u:{u}|g(u[1:])|g(u[:-1])if u else{''}
f=lambda s,t:min(g(s)-g(t),key=len)

Penggunaan: f('A&&C', 'A&$C')-> pengembalian'&&'

Meningkatkan ValueError jika tidak ada substring yang cocok.

Penjelasan:

g=lambda u:{u}|g(u[1:])|g(u[:-1])if u else{''}secara rekursif membuat satu set substring dari u f=lambda s,t:min(g(s)-g(t),key=len)mengambil substring terpendek dari perbedaan set

JavaScript (ES6), 79 byte

f=
(a,b)=>[...a].some((_,i,c)=>c.some((_,j)=>b.indexOf(s=a.substr(j,i+1))<0))?s:''

<div oninput=o.textContent=f(a.value,b.value)><input id="a"/><input id="b"/><pre id=o>

Jika pengembalian falsedapat diterima, simpan 2 byte dengan menggunakan &&salih-alih ?s:''.

Pyth, 11 byte

Jwhf!}TJ.:z

Cobalah online!

JavaScript (Firefox), 80 byte

solution=

a=>b=>[for(_ of(i=0,a))for(_ of(j=!++i,a))if(b.includes(s=a.substr(j++,i)))s][0]

document.write("<pre>"+
[ [ "test", "best" ], [ "wes", "west" ], [ "red", "dress" ] ]
.map(c=>c+": "+solution(c[0])(c[1])).join`\n`)

Tes hanya berfungsi di Firefox. Kembali undefinedjika tidak ada substring.

Retina , 37 byte

M!&`\G(.+?)(?!.*¶.*\1)
O$#`.+
$.&
G1`

Output kosong jika tidak ditemukan substring yang valid di A .

Cobalah online! (Sedikit dimodifikasi untuk menjalankan beberapa test case sekaligus. Format input sebenarnya dipisahkan dengan linefeed, tetapi test suites lebih mudah ditulis dengan satu case test per baris. Kerangka uji mengubah ruang menjadi linefeed sebelum kode aktual dimulai.)

Penjelasan

M!&`\G(.+?)(?!.*¶.*\1)

Untuk setiap posisi awal yang memungkinkan di A, cocokkan substring terpendek yang tidak muncul di B. The &adalah untuk tumpang tindih pertandingan, seperti yang kita benar-benar mencoba setiap posisi awal, bahkan jika pertandingan lebih panjang dari satu karakter. The \Gmemastikan bahwa kami tidak melewati posisi apa pun - khususnya, dengan cara ini kami harus berhenti di umpan baris, sehingga kami tidak mendapatkan kecocokan tambahan dari , sehingga semua substring yang memulai lebih jauh langsung dari posisi saat ini, jadi membuang itu bukan masalah (dan sebenarnya meningkatkan kinerja).B dirinya sendiri. Alasan ini tidak mengacaukan segalanya sebenarnya cukup halus: karena jika ada posisi awal di Amana kita tidak dapat menemukan substring yang valid, maka itu juga merupakan kegagalan yang akan menyebabkan\G berhenti memeriksa setiap posisi lebih lanjut. Namun, jika (dari posisi awal saat ini) semua substring muncul diB

Karena M!konfigurasi, semua pertandingan ini akan dikembalikan dari panggung, bergabung dengan umpan garis.

O$#`.+
$.&

Ini memilah garis dari hasil sebelumnya dengan panjang. Ini dilakukan dengan mencocokkan baris dengan .+. Kemudian $mengaktifkan bentuk "sort-by", sehingga pertandingan diganti dengan $.&untuk menentukan urutan sortir. Itu $.&sendiri menggantikan pertandingan dengan panjangnya. Akhirnya, #opsi memberi tahu Retina untuk mengurutkan secara numerik (jika tidak, itu akan memperlakukan angka yang dihasilkan sebagai string dan mengurutkannya secara leksikografis).

G1`

Akhirnya, kami hanya menyimpan baris pertama, dengan menggunakan tahap grep dengan regex kosong (yang selalu cocok) dan batas 1.

Perl, 87 85

sub{(grep{$_[1]!~/\Q$_/}map{$}=$_;map{substr($_[0],$_,$})}@}}(@}=0..length$_[0]))[0]}

Ini adalah fungsi anonim yang mengembalikan pertama (berdasarkan posisi) dari substring terpendek $_[0]yang tidak terjadi di $_[1], atau undefjika tidak ada substring seperti itu ada.

Program pengujian dengan string yang diambil dari jawaban @ iAmMortos, diuji dengan Perl 5.22.1:

#!/usr/bin/perl -l
use strict;
use warnings;

my $f = <see above>;
print $f->('abcd', 'abc');
print $f->('abcd', 'dabc');
print $f->('abcd', 'dcbabbccd');
print $f->('abcdf', 'abcdebcdf');
print $f->('abc', 'abc');

Haskell, 72 byte

import Data.Lists
a#b=argmin length[x|x<-powerslice a,not$isInfixOf x b]

Contoh penggunaan: "abcd" # "dabc"-> "cd".

Implementasi langsung: bangun semua substring adan pertahankan yang tidak muncul b. argminmengembalikan elemen daftar yang meminimalkan fungsi mengingat argumen ke-2, di sini:length .

Pyth - 9 6 byte

h-Fm.:

Cobalah online di sini .

C #, 152 byte

string f(string a,string b){int x=a.Length;for(int i=1;i<=x;i++)for(int j=0;j<=x-i;j++){var y=a.Substring(j,i);if(!b.Contains(y))return y;}return null;}

Ruby, 70 byte

Mengumpulkan semua substring dengan panjang tertentu dari string pertama, dan jika ada yang tidak ada di string kedua, kembalikan.

->a,b{r=p;(1..l=a.size).map{|i|(0...l).map{|j|b[s=a[j,i]]?0:r||=s}};r}

Burlesque - 26 byte

Saat ini cara terpendek yang bisa saya lakukan adalah:

lnp^sujbcjz[{^p~[n!}f[-][~

Japt , 14 byte

Êõ!ãU c k!èV g

Cobalah online!

Kembali undefinedjika tidak ada substring yang valid . Ini berbeda dari mengembalikan string "tidak terdefinisi" , meskipun perbedaannya hanya terlihat karena flag -Q.

Penjelasan:

Ê                 :Length of the first input
 õ                :For each number in the range [1...length]:
  !ãU             : Get the substrings of the first input with that length
      c           :Flatten to a single array with shorter substrings first
        k         :Remove ones which return non-zero to:
         !èV      : Number of times that substring appears in second input
             g    :Return the shortest remaining substring

Japt -h, 11 byte

à f@øX «VøX

Cobalah

                :Implicit input of strings U & V
à               :All combinations of U
  f@            :Filter each as X
    øX          :  Does U contain X?
       «        :  Logical AND with the negation of
        VøX     :  Does V contain X?
                :Implicit output of last element