การป้อนข้อมูล:

สองสายที่ไม่มีบรรทัดใหม่หรือช่องว่าง

เอาท์พุท:

ทั้งสองสายการป้อนข้อมูลบนเส้นที่แยกต่างหากที่มีช่องว่างในกรณีที่จำเป็น^†หนึ่งในสองสาย และสายที่สามกับตัวละครA, R, Mและคิดเป็นเพิ่ม , ลบออก , การแก้ไขและเปลี่ยนแปลง

^†เราเพิ่มช่องว่างให้กับสตริงป้อนข้อมูลด้านบนหรือด้านล่าง (ถ้าต้องการ) เป้าหมายของการท้าทายนี้คือการส่งออกมีจำนวนน้อยที่สุดของการเปลี่ยนแปลง ( ARM) เป็นไปได้ยังเป็นที่รู้จักLevenshtein ระยะทาง

ตัวอย่าง:

สมมติว่าสตริงอินพุตเป็นABCDEFและAFBECDจากนั้นผลลัพธ์จะเป็น:

A B CDEF
AFBECD  
 A A  RR

ต่อไปนี้เป็นตัวอย่างเอาต์พุตที่ไม่ถูกต้องอื่น ๆ ที่เป็นไปได้ (และมีอีกมาก):

ABCDEF
AFBECD
 MMMMM

A BCDEF
AFBECD 
 A MMMR

AB CDEF
AFBECD 
 MAMMMR

ABC DEF
AFBECD 
 MMAMMR

ABC  DEF
AFBECD  
 MMAA RR

ABCDEF 
AFB ECD
 MMR MA

 AB CDEF   // This doesn't make much sense,
AFBECD     // but it's to show leading spaces are also allowed
AM A  RR

สิ่งเหล่านี้ไม่มีการเปลี่ยนแปลงเพียงสี่อย่างเท่านั้นดังนั้นA B CDEF\nAFBECD \n A A RRผลลัพธ์ที่ถูกต้องสำหรับความท้าทายนี้

กฏท้าทาย:

• คุณสามารถสมมติว่าสายป้อนข้อมูลจะไม่มีบรรทัดใหม่หรือช่องว่างใด ๆ
• สตริงอินพุตสองสตริงมีความยาวต่างกัน
• หนึ่งในสองสายอินพุตควรยังคงเป็นเช่นยกเว้นช่องว่างชั้นนำ / ต่อท้ายตัวเลือก
• หากภาษาของคุณไม่รองรับอะไรนอกจาก ASCII คุณสามารถสมมติว่าการป้อนข้อมูลจะมีเฉพาะอักขระ ASCII ที่พิมพ์ได้
• รูปแบบอินพุตและเอาต์พุตมีความยืดหยุ่น คุณสามารถมีสาม Strings ที่แยกกันอาร์เรย์สตริงสตริงเดี่ยวที่มีบรรทัดใหม่อาร์เรย์อักขระ 2D และอื่น ๆ
• คุณได้รับอนุญาตให้ใช้อย่างอื่นแทนARMแต่ระบุสิ่งที่คุณใช้ (เช่น123หรือabc.อื่น ๆ )
• หากมีเอาต์พุตที่ถูกต้องมากกว่าหนึ่งรายการที่มีจำนวนการเปลี่ยนแปลงเท่ากัน ( ARM) คุณสามารถเลือกว่าจะเอาท์พุทที่เป็นไปได้อย่างใดอย่างหนึ่งหรือทั้งหมด

• ช่องว่างนำหน้าและต่อท้ายเป็นตัวเลือก:

  A B CDEF
  AFBECD
   A A  RR
  

  หรือ

  "A B CDEF\nAFBECD\n A A  RR"
                   ^
                   Note there are no spaces here
  

กฎทั่วไป:

• นี่คือcode-golfดังนั้นคำตอบที่สั้นที่สุดในจำนวนไบต์ชนะ
  อย่าปล่อยให้ภาษาที่ใช้รหัสกอล์ฟกีดกันคุณจากการโพสต์คำตอบด้วยภาษาที่ไม่ codegolfing พยายามหาคำตอบสั้น ๆ ที่เป็นไปได้สำหรับภาษาโปรแกรม 'ใด ๆ '
• กฎมาตรฐานจะใช้สำหรับคำตอบของคุณดังนั้นคุณจึงได้รับอนุญาตให้ใช้ STDIN / STDOUT ฟังก์ชัน / เมธอดพร้อมพารามิเตอร์ที่เหมาะสมโปรแกรมเต็มรูปแบบ การโทรของคุณ
• ช่องโหว่เริ่มต้นเป็นสิ่งต้องห้าม
• หากเป็นไปได้โปรดเพิ่มลิงค์พร้อมทดสอบรหัสของคุณ
• นอกจากนี้โปรดเพิ่มคำอธิบายหากจำเป็น

กรณีทดสอบ:

In: "ABCDEF" & "AFBECD"

Output (4 changes):
A B CDEF
AFBECD  
 A A  RR                  

In: "This_is_an_example_text" & "This_is_a_test_as_example"

Possible output (13 changes):
This_is_an       _example_text
This_is_a_test_as_example     
         MAAAAAAA        RRRRR

In: "AaAaABBbBBcCcCc" & "abcABCabcABC"

Possible output (10 changes):
AaAaABBbBBcCcCc
 abcABCab cABC 
R MM  MMMR MM R

In: "intf(){longr=java.util.concurrent.ThreadLocalRandom.current().nextLong(10000000000L);returnr>0?r%2:2;}" & "intf(){intr=(int)(Math.random()*10);returnr>0?r%2:2;}"

Possible output (60 changes):
intf(){longr=java.util.concurrent.ThreadLocalRandom.current().nextLong(10000000000L);returnr>0?r%2:2;}
intf(){i ntr=(      i    n      t)(M  ath.r   andom        ()*         10          );returnr>0?r%2:2;}
       MR M  MRRRRRR RRRR RRRRRR MMMRR MMMMRRR     RRRRRRRR  MRRRRRRRRR  RRRRRRRRRR 

In: "ABCDEF" & "XABCDF"

Output (2 changes):
 ABCDEF
XABCD F 
A    R 

In: "abC" & "ABC"

Output (2 changes):
abC
ABC
MM 

Haskell , 192 181 174 161 158 150 147 143 158 ¹ไบต์

e@(a:r)&f@(b:s)=snd$maximum[([1|' '<-s!!2],s)|s<-z(z(:))[a:" R",' ':b:"A",a:b:last("M":[" "|a==b])][r&f,e&s,r&s]]
x&y=[x,y,"RA"!!(0^length x)<$x++y]
z=zipWith

ลองออนไลน์! ตัวอย่างการใช้: "ABCDEF" & "AFBECD". ส่งคืนรายการของสามสาย นี้เป็นส่วนขยายของการแก้ปัญหาการเวียนเกิดของฉันไปที่สามัญคำถาม Levenshtein ระยะทาง

คำอธิบาย:

ในการคำนวณการดัดแปลงขั้นต่ำที่จะได้รับจาก"xyz"ไป"yw"เรามุ่งเน้นไปที่อักขระตัวแรกของทั้งสองสตริง มีความเป็นไปได้สามประการ:

• ลบ: Drop xจากสายแรกและซ้ำคำนวณการปรับเปลี่ยนจะได้รับจากการ"yz" นี้ผลตอบแทนถัวเฉลี่ยสามบรรทัด"yw" ["yz","yw"," M"]เพิ่มxไปที่อันแรกเว้นวรรคที่หนึ่งและRที่สาม เราได้รับ

  xyz
  YW
  RM

• Add: Drop yจากสายที่สองและการคำนวณซึ่งจะส่งกลับผล"xyz" & "w" ["xyz","w","MRR"]เราจำเป็นต้องเพิ่มช่องว่างในบรรทัดแรกyไปยังบรรทัดที่สองและAบรรทัดที่สาม:

   xyz
  YW
  AMRR

• ดัดแปลง / ไม่เปลี่ยนแปลง:"yz" & "w"เราสามารถรวมทั้งสองกรณีเพราะทั้งสองต้องวางอักษรตัวแรกของทั้งสตริงและคำนวณการปรับเปลี่ยนน้อยที่สุดระหว่างสายที่เหลือ: สำหรับผลลัพธ์["yz","w","MR"]เราเพิ่มที่บรรทัดxแรกและyบรรทัดที่สอง เฉพาะบรรทัดสุดท้ายที่เราต้องแยกความแตกต่างว่าตัวอักษรเริ่มต้นเหมือนกัน หากเป็นเหมือนกันช่องว่างจะถูกเพิ่มในบรรทัดที่สามมิฉะนั้น (เช่นในกรณีนี้เพราะx \= y) an Mถูกเพิ่ม:

  xyz
  YW
  MMR

จากผู้สมัครทั้งสามนั้นเราจำเป็นต้องค้นหาผู้ที่มีการปรับเปลี่ยนน้อยที่สุด สิ่งนี้เทียบเท่ากับการมีช่องว่างมากที่สุดในบรรทัดที่สาม ดังนั้นเราจึงแปลงผู้สมัครแต่ละคนs(รายการของสามสายอักขระ) เป็น tuple ([1|' '<-s!!2],s)ซึ่งsจะปรากฏเป็นองค์ประกอบที่สองและองค์ประกอบแรกคือรายการที่มีองค์ประกอบมากเท่าที่มีช่องว่างในบรรทัดที่สามของs( s!!2เนื่องจากการจัดทำดัชนี 0) เนื่องจากอิลิเมนต์รายการ1ถูกใช้ แต่องค์ประกอบจริงนั้นไม่เกี่ยวข้องตราบใดที่มันยังคงเหมือนเดิมสำหรับผู้สมัครทุกคน

ทั้งหมดนี้ให้รายการของสิ่งอันดับ

[([1], ["xyz", "yw", "RM"]), ([], ["xyz", "yw", "AMRR"]), ([], ["xyz", " YW", "MMR"])]

_{¹ 15 ไบต์เพื่อแก้ไขข้อผิดพลาดที่ - การAเปลี่ยนแปลงที่ส่วนท้ายของสตริงจะแสดงเป็นR-changes}

JavaScript (ES6), 413 ... 343 342 ไบต์

บันทึก 5 ไบต์โดยปรับแต่งดัชนีลูปตามที่ @KevinCruijssen แนะนำ

รับอินพุตเป็น 2 สตริงในรูปแบบ currying ส่งคืนอาร์เรย์ 3 สตริง

b=>a=>{m=[];x=a.length;y=b.length;for(i=j=0,c=d='';i<=y;c+=R='R')m[i]=[[c,i++]];for(;j++<x;)m[i=0][j]=[d+=A='A',j];for(;i<y;i++)for(j=0;j<x;)[C]=m[[X,S]=m[i][j],[Y,I]=m[i+1][j],[Z,D]=m[i][++j],Q=[Z+R,D+1],i+1][j]=b[i]==a[j-1]?[X+' ',S]:S<I?D<S?Q:[X+'M',S+1]:D<I?Q:[Y+A,I+1];return[(g=s=>C.replace(/./g,c=>c==s?' ':b[i++],i=0))(A),g(R,b=a),C]}

กรณีทดสอบ

let f =

b=>a=>{m=[];x=a.length;y=b.length;for(i=j=0,c=d='';i<=y;c+=R='R')m[i]=[[c,i++]];for(;j++<x;)m[i=0][j]=[d+=A='A',j];for(;i<y;i++)for(j=0;j<x;)[C]=m[[X,S]=m[i][j],[Y,I]=m[i+1][j],[Z,D]=m[i][++j],Q=[Z+R,D+1],i+1][j]=b[i]==a[j-1]?[X+' ',S]:S<I?D<S?Q:[X+'M',S+1]:D<I?Q:[Y+A,I+1];return[(g=s=>C.replace(/./g,c=>c==s?' ':b[i++],i=0))(A),g(R,b=a),C]}

console.log(f('ABCDEF')('AFBECD').join`\n`);
console.log(f('This_is_an       _example_text')('This_is_a_test_as_example').join`\n`);
console.log(f('AaAaABBbBBcCcCc')('abcABCabcABC').join`\n`);
console.log(f("intf(){longr=java.util.concurrent.ThreadLocalRandom.current().nextLong(10000000000L);returnr>0?r%2:2;}")("intf(){intr=(int)(Math.random()*10);returnr>0?r%2:2;}").join`\n`);
console.log(f('ABCDEF')('XABCDF').join`\n`);

น้อย golfed

b => a => {
  m = []; x = a.length; y = b.length;

  // initialize the leftmost column and the topmost row
  for(i = j = 0, c = d = ''; i <= y; c += R = 'R')
    m[i] = [[c, i++]];
  for(; j++ < x;)
    m[i = 0][j] = [d += A = 'A', j];

  // walk through the Levenshtein matrix
  for(; i < y; i++)
    for(j = 0; j < x;)
      [C] = m[                                // C = current string, once updated
        [X, S] = m[i][j],                     // substitution
        [Y, I] = m[i + 1][j],                 // insertion
        [Z, D] = m[i][++j],                   // deletion
        Q = [Z + R, D + 1],                   // precomputed update for deletion
        i + 1
      ][j] =
        b[i] == a[j - 1] ?
          [X + ' ', S]                        // unchanged character
        :
          S < I ?
            D < S ? Q : [X + 'M', S + 1]      // deletion or substitution
          :
            D < I ? Q : [Y + A, I + 1];       // deletion or insertion

  return [
    // g = helper function to format the output strings by inserting spaces
    (g = s => C.replace(/./g, c => c == s ? ' ' : b[i++], i = 0))(A),
    g(R, b = a),

    // final modification string, picked from the last visited cell
    C
  ]
}

ตัวอย่าง

ด้านล่างเป็นเมทริกซ์เริ่มต้นสำหรับb = "foo"และa = "ok" :

//                     'o'           'k'
[ [ [ '',    0 ], [ 'A',   1 ], [ 'AA',  2 ] ],
  [ [ 'R',   1 ],  (undefined),  (undefined) ],  // 'f'
  [ [ 'RR',  2 ],  (undefined),  (undefined) ],  // 'o'
  [ [ 'RRR', 3 ],  (undefined),  (undefined) ] ] // 'o'

และนี่คือเมทริกซ์สุดท้ายหลังจากการทำซ้ำทั้งหมด:

//                     'o'           'k'
[ [ [ '',    0 ], [ 'A',   1 ], [ 'AA',  2 ] ],
  [ [ 'R',   1 ], [ 'M',   1 ], [ 'MA',  2 ] ],  // 'f'
  [ [ 'RR',  2 ], [ 'R ',  1 ], [ 'R A', 2 ] ],  // 'o'
  [ [ 'RRR', 3 ], [ 'RR ', 2 ], [ 'R M', 2 ] ] ] // 'o'

สตริงการดัดแปลงสุดท้ายพร้อมกับระยะทางของ Levenshtein จะถูกเก็บไว้ในเซลล์ล่างขวา

Python 2 , 548 536 484 500 ¹ 488 447 381 ² 373 371 357 350 ไบต์

s,t=input()
n,m=len(s),len(t)
r=range
L=[[(j,'RA'[i<1]*j)for j in r(i,m-~i)]for i in r(n+1)]
for i in r(n):
 for j in r(m):M,R=L[i][j:j+2];A=L[i+1][j];v,V=min(A,R,M);x=('AR'[v in R],'M_'[s[i]==t[j]])[v in M];_=M;X=eval(x)[1]+x;L[i+1][j+1]=v+(x<'_'),X
for i in r(len(X)):s=s[:i]+' '*('B'>X[i])+s[i:];t=t[:i]+' '*('R'==X[i])+t[i:]
print s+'\n'+t+'\n'+X

ลองออนไลน์!

ใช้'ARM_'แทน'ARM '

ทำงานโดยการสร้างเมทริกซ์ Levenshtein, และจากนั้นภายในข้างหลังเพื่อหาการดำเนินงาน ตอนนี้สร้างสตริงการดำเนินการในเวลาเดียวกันกับเมทริกซ์ Levenshtein เช่นเดียวกับคำตอบ JS ของ Arnauld

_{1: ไบต์เพิ่มเติมเนื่องจากมันไม่ทำงานหากสตริงแรกเป็นอักขระตัวเดียว}

_{2: เปลี่ยนเป็นการสร้างชุดค่าผสมในเมทริกซ์ Levenshtein}

Python 2 , 310 ไบต์

from difflib import*
a,b=input()
U,j=[],' '
for g,s,t,x,y in SequenceMatcher(0,a,b).get_opcodes():
	g,Y,T=g[0],y-x,t-s
	z,A,B=Y-T,a[s:t],b[x:y]
	if'q'<g:U+=[A+z*j,B+j*-z,'M'*min(T,Y)+'A'*z+'R'*-z]
	if'e'==g:U+=[A,B,j*Y]
	if'i'==g:U+=[j*Y,B,'A'*Y]
	if'e'>g:U+=[A,j*T,'R'*T]
for e in[0,1,2]:print''.join(U[e::3])

ลองออนไลน์!

การใช้difflib.SequenceMatcherที่คำนวณการจัดตำแหน่งระหว่างสองสาย

Mathematica, 250 256 259 384 ไบต์

~ 0.00035 วินาทีสำหรับกรณีรหัส Java

(i=o=p="";a=Array;r=StringLength;If[Length@#>0,g=#&@@#;h=#[[2]];u=r@g;v=r@h;i=i<>g;o=o<>h;w=Abs[v-u];k=a[" "&,w];If[u<v,i=i<>k,o=o<>k];p=p<>a["M"&,u~Min~v];p=p<>a[If[u>v,"R","A"]&,w],i=i<>#;o=o<>#;p=p<>a[" "&,r@#]]&/@SequenceAlignment[#,#2];{i,o,p})&

การใช้งาน: f["ABCDE", "ABCDF"]

ลองออนไลน์!

รหัสจะขึ้นอยู่กับข้อเท็จจริงที่ใช้SequenceAlignmentงานได้ตามค่าเริ่มต้น

ด้วยการตั้งค่าเริ่มต้น SimilarityRules-> Automatic แต่ละการจับคู่ระหว่างองค์ประกอบสองส่วนจะมีค่า 1 ถึงคะแนนความคล้ายคลึงกันโดยรวมในขณะที่แต่ละค่าไม่ตรงกันการแทรกหรือการลบจะมีค่า -1

คือการให้คะแนนจะถูกคำนวณโดยM, AและRตาม

ตัวอย่าง:

D , 351 345 ไบต์

-6 ไบต์ thanx ถึง KevinCruijssen

string f(string a,string b){import std.algorithm;string x,y,z;size_t i,j,k;foreach(c;levenshteinDistanceAndPath(a,b)[1]){final switch(c)with(EditOp){case none:x~=a[i++];y~=b[j++];z~=" ";break;case substitute:x~=a[i++];y~=b[j++];z~="M";break;case insert:x~=" ";y~=b[j++];z~="A";break;case remove:x~=a[i++];y~=" ";z~="R";}}return x~"\n"~y~"\n"~z;}

ลองออนไลน์!