शब्द परिवर्तक प्रतिक्रियाशीलता

Question

वर्ड चेंजर एक ऐसा गेम है जिसमें आप सिंगल-कैरेक्टर एडिट के जरिए एक शब्द को दूसरे में बदलने की कोशिश कर रहे हैं, जिसमें हर स्टेप खुद का शब्द है। इस चुनौती के लिए, संपादन प्रतिस्थापन, सम्मिलन या विलोपन हो सकते हैं। उदाहरण के लिए, विनर → लोसर इस मार्ग के साथ किया जा सकता है (अन्य भी हो सकते हैं):

WINNER
DINNER
DINER
DINE
LINE
LONE
LOSE
LOSER

एक और तरीका है, तो आपको हर बार 1 शब्द के लेवेंसहाइट दूरी पर दूसरे शब्दों के माध्यम से एक शब्द तक पहुंचने में सक्षम होना चाहिए।

कोडिंग

आपको एक शब्द सूची और दो शब्द दिए जाएंगे और यदि कोई मार्ग मौजूद है या कोई निरंतर स्थिर मान या सुसंगत व्यवहार है यदि कोई मार्ग मौजूद नहीं है, तो आपको एक शब्द से दूसरे शब्द के लिए एक मान्य मार्ग को आउटपुट करना होगा।

• आप मान सकते हैं कि इनपुट शब्द शब्द सूची में दोनों हैं
• शब्द सूची को किसी भी सुविधाजनक फ्लैट प्रारूप के माध्यम से लिया जा सकता है।
  • सूची, सेट, कोशिश, अंतरिक्ष-अलग तार, और लाइन-अलग-अलग फ़ाइलें सभी मान्य हैं (उदाहरण के लिए), लेकिन लेवेंसहाइट आसन्न का एक पूर्व-संकलित ग्राफ़ नहीं है।
• आउटपुट रूट में इनपुट शब्द दोनों शामिल होने चाहिए, लेकिन जो शुरू होता है और समाप्त होता है वह कोई मायने नहीं रखता।
• यदि कोई मार्ग नहीं मिला है, तो आप एक विशिष्ट स्थिरांक, एक मिथ्या मान, खाली सूची, एक अपवाद फेंक सकते हैं, एक गैर-जासूसी कोड से बाहर निकल सकते हैं, या कोई अन्य व्यवहार जो परिमित समय में होता है।
• मार्ग को इष्टतम होने की आवश्यकता नहीं है और इस बात की कोई आवश्यकता नहीं है कि किस मार्ग को लिया जाना चाहिए
• कम्प्यूटेशनल जटिलता मायने नहीं रखती है, हालांकि आपके कार्यक्रम को समय की एक सीमित मात्रा में समाप्त करने की गारंटी दी जानी चाहिए। (भले ही यह ब्रह्मांड की गर्मी से परे चलेगा)
• आप मान सकते हैं कि सभी शब्द पूरी तरह से एक ही मामले में अक्षरों से बने हैं

उदाहरण परीक्षण मामले

• कैट → डीओजी; [CAT, DOG, COG, COT, FROG, GROG, BOG]
  • कैट, सीओटी, सीओजी, डीओजी
• बैट → शौर्य; [बैट, शोर्ट, हाट, हाट, बैट, सैट, देखा, सो, शो, हा]
  • कोई रूट नहीं मिला
• BREAK → FIX; [BREAK, FIX, BEAK, BREAD, READ, BEAD, RED, BED, BAD, BID, FAD, FAX]
  • BREAK, BREAD, BEAD, BAD, FAD, FAX, FIX
• भवन → डेस्ट्रो; [BUILD, DESTROY, BUILT, GUILT, GUILD, GILD, GILL, BILL, DILL, FILL, DESTRUCT, STRUCTURE, CONSTRUCT]
  • कोई रूट नहीं मिला
• कार्ड → बोर्ड; [कार्ड, बोर्ड, बोर्ड]
  • कार्ड, बोर्ड, बोर्ड
• डेमन → एंगेल; [डेमन, एंगेल]
  • कोई रूट नहीं मिला
• आखिरी → पास्ट; [आखिरी, पूर्व, ब्लास्ट, कास्ट, ब्लैक, भूत, पोस्ट, बोर्ड]
  • लंबा, पिछला
• INSERT → DELETE; यह शब्द सूची
  • INSERT, INVERT, INVENT, INBENT, UNBENT, UNBEND, UNBIND, UNKIND, UNKING, INKING, IRKING, DIRKING, DARKING, DARLING, ARLING, AILING, SIRING, SERING, SERINE, SERINE, NERITE, CERITE, CITE, CITE, CITE, CITE, NITE, CERITE, CINITE, CERITE, CERITE, INNERT, INVERT, INBENTER, INBIL, UNBEND, UNBEND, UNBEND, UNKEND, INKERT, INKT), INSERT, INVERT) के लिए भर्ती हुए हैं हटाएँ

Comments

संबंधित , संबंधित

— बीफ़स्टर

क्या हम वैध मार्गों की सूची तैयार कर सकते हैं या यह एक मार्ग होना चाहिए?

— एमिग्ना

@Eigna कोई भी मार्ग करेगा। जैसा कि मैंने उल्लेख किया है "मार्ग को इष्टतम होने की आवश्यकता नहीं है"

— बीफस्टर

क्या हमें आउटपुट में शुरू और समाप्त होने वाले शब्द को शामिल करने की आवश्यकता है? मार्ग हमेशा शुरू और समाप्त होंगे!

— मैजिक ऑक्टोपस Urn

@MagicOctopusUrn "आउटपुट रूट में इनपुट शब्द दोनों शामिल होने चाहिए, लेकिन जो शुरू और समाप्त होता है वह कोई मायने नहीं रखता है।"

— बीफस्टर

Answer 1

05AB1E , 23 21 20 बाइट्स

मान्य मार्गों की सूची प्रिंट करता है। केविन क्रूज़सेन के
लिए धन्यवाद 2 बाइट्स बचाए ।

怜€`ʒü.LP}ʒ¬²Qsθ³Q*

इसे ऑनलाइन आज़माएं!

Comments

आप को बदलने के द्वारा 2 बाइट्स बचा सकते हैं Dævyœ«}करने के लिए 怜€` । (यह निश्चित नहीं है कि दोनों नक्शे अलग-अलग क्यों €ठीक हैं, लेकिन æεœ`}btw नहीं है, लेकिन यह वैसे ही बाइट-काउंट है।)

— केविन क्रूज़सेन

बहुत बुरा के उत्पाद []है 1बजाय 0(बहुत आश्चर्य की बात नहीं है, हालांकि) या कि एक खाली सूची के साथ एक समान की जांच जाहिरा तौर पर एक खाली सूची में परिणाम के बजाय 0(यह एक मैं एक बग के रूप में देखते ..) .. नहीं तो आप संयुक्त किया जा सकता था फ़िल्टर और find_first को बचाने के लिए एक और बाइट:怜€`.Δü.LPy¬²Qsθ³QP

— केविन क्रूज़सेन

@ केविनक्रूजसेन: धन्यवाद! मुझे यकीन नहीं है कि मैंने उपयोग करने के बारे में क्यों नहीं सोचा €। मुझे लगता है कि वेक्टराइजेशन के कारण एक खाली सूची में समान चेक परिणाम हैं। हो सकता है कि खाली सूची के लिए एक विशेष मामला होना चाहिए, लेकिन शायद यह अन्य मामलों में अप्रत्याशित होगा।

— एमिग्ना

17 के लिए कुछ इस तरह काम करता है: ऑनलाइन कोशिश करो!

— मैजिक ऑक्टोपस Urn

@MagicOctopusUrn: दुर्भाग्य से, हमें आउटपुट में पथ के सभी शब्दों को शामिल करना होगा।

— एमिग्ना

Answer 2

जावास्क्रिप्ट (V8) ,  177  176 बाइट्स

के रूप में इनपुट लेता है (target)(source, list)। सभी संभव मार्गों को प्रिंट करता है। या कोई समाधान नहीं है तो प्रिंट करता है।

t=>F=(s,l,p=[],d)=>s==t?print(p):l.map((S,i)=>(g=(m,n)=>m*n?1+Math.min(g(m-1,n),g(m,--n),g(--m,n)-(S[m]==s[n])):m+n)(S.length,s.length)^d||F(S,L=[...l],[...p,L.splice(i,1)],1))

इसे ऑनलाइन आज़माएं!

टिप्पणी की गई

t =>                            // t = target string
F = (                           // F is a recursive function taking:
  s,                            //   s = source string
  l,                            //   l[] = list of words
  p = [],                       //   p[] = path
  d                             //   d = expected Levenshtein distance between s and the
) =>                            //       next word (initially undefined, so coerced to 0)
  s == t ?                      // if s is equal to t:
    print(p)                    //   stop recursion and print the path
  :                             // else:
    l.map((S, i) =>             //   for each word S at index i in l[]:
      ( g =                     //     g = recursive function computing the Levenshtein
        (m, n) =>               //         distance between S and s
        m * n ?                 //       if both m and n are not equal to 0:
          1 + Math.min(         //         add 1 to the result + the minimum of:
            g(m - 1, n),        //           g(m - 1, n)
            g(m, --n),          //           g(m, n - 1)
            g(--m, n) -         //           g(m - 1, n - 1), minus 1 if ...
            (S[m] == s[n])      //           ... S[m - 1] is equal to s[n - 1]
          )                     //         end of Math.min()
        :                       //       else:
          m + n                 //         return either m or n
      )(S.length, s.length)     //     initial call to g with m = S.length, n = s.length
      ^ d ||                    //     unless the distance is not equal to d,
      F(                        //     do a recursive call to F with:
        S,                      //       the new source string S
        L = [...l],             //       a copy L[] of l[]
        [...p, L.splice(i, 1)], //       the updated path (removes S from L[])
        1                       //       an expected distance of 1
      )                         //     end of recursive call
    )                           //   end of map()

Answer 3

वोल्फ्राम लैंग्वेज (गणितज्ञ) , 59 बाइट्स

Select[Rule@@@#~Tuples~2,EditDistance@@#<2&]~FindPath~##2&;

इसे ऑनलाइन आज़माएं!

Answer 4

पायथन 2 , 155 बाइट्स

f=lambda a,b,W,r=[]:a==b and r+[a]or reduce(lambda q,w:q or any({a,a[:i]+a[i+1:]}&{w,w[:i]+w[i+1:]}for i in range(len(a+w)))and f(w,b,W-{a},r+[a]),W-{a},0)

इसे ऑनलाइन आज़माएं!

दो शब्दों और इनपुट के रूप में शब्दों का एक सेट लेता है; यदि कोई स्ट्रिंग की सूची के रूप में मौजूद है, तो एक गैर-इष्टतम) मार्ग देता है, अन्यथा गलत रिटर्न देता है।

यह टुकड़ा:

any({a,a[:i]+a[i+1:]}&{w,w[:i]+w[i+1:]}for i in range(len(a+w)))

है Trueयदि और केवल यदि a==wया aकी Levenshtein दूरी है 1से w।

Answer 5

वोल्फ्राम भाषा (गणितज्ञ) , 124 बाइट्स

Join[#,Select[Flatten[Permutations/@Subsets@#3,1],s=#;t=#2;Union[EditDistance@@@Partition[Join[s,#,t],2,1]]=={1}&][[1]],#2]&

इसे ऑनलाइन आज़माएं!

Answer 6

अजगर 2 , 163 बाइट्स

यदि कोई मार्ग पाया जाता है, तो यह stderr के लिए आउटपुट है और प्रोग्राम एग्जिट कोड से बाहर निकल जाता है। 1.
यदि कोई रूट नहीं है, तो कोई आउटपुट नहीं है और प्रोग्राम एग्जिट कोड 0 से समाप्त हो जाता है।

s,e,d=input();r=[[s]]
for x in r:t=x[-1];t==e>exit(x);r+=[x+[w]for w in d-set(x)for a,b in(t,w),(w,t)for i in range(len(b)*2)if a==b[:i/2]+a[i/2:][:i%2]+b[i/2+1:]]

इसे ऑनलाइन आज़माएं!

Answer 7

पायथन 3 , 217 214 212 201 बाइट्स

-11 बाइट्स xxor से संकेत के लिए बाइट्स

d=lambda a,b:min(d(a[1:],b[1:])+(a[0]!=b[0]),d(a[1:],b)+1,d(a,b[1:])+1)if b>""<a else len(a+b)
def g(a,b,l,p=[]):
	if a==b:yield[a]+p
	for c in(a!=b)*l:
		if(c in p)+d(a,c)==1:yield from g(c,b,l,[a]+p)

इसे ऑनलाइन आज़माएं!

Answer 8

जेली , 38 बाइट्स

⁵ḟ,€0ị$ṭ¹-Ƥ$€e€/ẸƊƇḢ€
Wṭ@ⱮÇßƊe@⁴oṆƲ?€Ẏ

इसे ऑनलाइन आज़माएं!

एक पूर्ण कार्यक्रम जिसमें तीन तर्क स्वीकार किए जाते हैं। पहला शुरुआती शब्द है और इसकी आपूर्ति की जाती है [["START"]]। दूसरा तर्क अंतिम शब्द है, जिसकी आपूर्ति की जाती है "END"। तीसरा तर्क शब्द सूची है, जिसे उद्धृत, अल्पविराम से अलग किए गए शब्दों के रूप में आपूर्ति की जाती है।

कार्यक्रम सूची की एक सूची देता है, जिसमें प्रत्येक सूची शुरू से अंत तक एक वैध मार्ग का प्रतिनिधित्व करती है। यदि कोई मान्य मार्ग नहीं है, तो प्रतिक्रिया एक खाली सूची है।

टीआईओ लिंक में, रिक्त स्थान द्वारा अलग-अलग प्रत्येक शब्द के साथ परिणाम को प्रदर्शित करने के लिए पाद लेख होता है और शब्दों की प्रत्येक सूची को न्यूलाइन्स द्वारा अलग किया जाता है। यदि एक प्रिंटआउट अंतर्निहित सूची प्रतिनिधित्व पसंद किया जाता है, तो यह किया जा सकता है ÇŒṘ।

05ABIE के विपरीत, लेवेंसहाइट दूरी के लिए कोई अंतर्निहित नहीं है, इसलिए यह कार्यक्रम एक एकल चरित्र लापता के साथ उपसर्गों की तुलना करता है, कुछ हद तक @ ChasBrown के समाधान के समान है , हालांकि एक जेली ट्विस्ट के साथ।

व्याख्या

हेल्पर लिंक: शब्दों की एक सूची लेता है और संभव विस्तारित सूची की एक सूची या एक खाली सूची अगर कोई विस्तार संभव नहीं है, तो monadic लिंक

⁵ḟ                      | Filter the word list to remove words already used
  ,€0ị$                 | Pair each word with the last word in the current path
                  ƊƇ    | Filter these pairs such that
              e€/Ẹ      |   there exists any
       ṭ¹-Ƥ$€           |   match between the original words or any outfix with a single character removed
                    Ḣ€  | Take the first word of each of these pairs (i.e. the possible extensions of the route)

मुख्य लिंक

              €         | For each of the current paths
            Ʋ?          | If:
       e@⁴              |   The path contains the end word
          oṆ            |   Or the path is empty (i.e. could not be extended)
W                       | Return the path wrapped in a list (which will be stripped by the final Ẏ)
 ṭ@ⱮÇ                   | Otherwise, look for possible extensions using the helper link, and add onto the end of the path
     ßƊ                 | And then feed all of these paths back through this link
               Ẏ        | Strip back one layer of lists (needed because each recursion nests the path one list deeper)

Answer 9

स्विफ्ट 4.2 / Xcode 10.2.1 , 387 बाइट्स

func d(l:String,m:String)->Bool{return (0..<l.count).contains{var c=l;c.remove(at:c.index(c.startIndex,offsetBy:$0));return c==m}};func f(r:[String])->[String]{if b==r.last!{return r};return w.lazy.map{!r.contains($0)&&(d(l:r.last!,m:$0)||d(l:$0,m:r.last!)||(r.last!.count==$0.count&&zip(r.last!,$0).filter{$0 != $1}.count==1)) ? f(r:r+[$0]):[]}.first{!$0.isEmpty} ?? []};return f(r:[a])

इसे ऑनलाइन आज़माएं!