Với hai chữ, spoonerise họ bằng cách chuyển các cụm phụ âm đầu tiên của họ. Ít byte nhất sẽ thắng.

plaster man -> master plan
blushing crow -> crushing blow
litigating more -> mitigating lore
strong wrangler -> wrong strangler
def ghi -> ghef di
few years -> yew fears

Các phụ âm xuất hiện trước nguyên âm đầu tiên ( aeiou) được chuyển đổi.

Đầu vào: Hai chuỗi chữ thường bắt đầu bằng các phụ âm khác nhau và mỗi chuỗi chứa một nguyên âm aeiou.

Đầu ra: Hai chuỗi muỗng, theo đúng thứ tự.

Đối với đầu vào và / hoặc đầu ra, hai chuỗi cũng có thể nằm trong một danh sách hoặc tương tự hoặc dưới dạng một chuỗi có dấu phân cách.

    var QUESTION_ID=69385,OVERRIDE_USER=20260;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/69385/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

    body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

    <script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

**Leaderboard:**

Đây là một bản sao gần như của câu hỏi cũ này , nhưng tôi hy vọng sẽ viết một thông số rõ ràng và ổn định hơn để câu hỏi cũ có thể được đóng lại dưới dạng một bản sao .

Vim, 18 tổ hợp phím

/[aeiou]<CR>dbwvnhp0P

Thủ thuật quan trọng là dán một cái gì đó trong chế độ Visual thực sự đặt nội dung cũ của lựa chọn hình ảnh vào bộ đệm dán.

brainfuck, 238 207 byte

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

Yêu cầu ,trả về 0 trên EOF, các ô gói 8 bit và khả năng di chuyển sang trái từ ô 0. Theo kinh nghiệm của tôi, đây là các cài đặt mặc định phổ biến nhất.

Tôi khá hài lòng với điều này. Lần thử đầu tiên của tôi là 314 byte và đây chắc chắn là một sự cải tiến. :)

Nó hoạt động bằng cách lưu trữ mỗi byte từ đầu vào trong hai ô; một cái có giá trị thực của byte và cái kia có đầu ra của đoạn mã sau khi được đưa ra (giá trị của byte - 97):

[
    ----
    [
        ----
        [
            ------
            [
                ------>>
            ]
        ]
    ]
]

Nếu ký tự là một phụ âm, nó xuất phát từ đó với giá trị khác không. Nếu đó là một nguyên âm, nó trở thành 0. Từ đó, vấn đề chỉ là tìm từ thứ hai bắt đầu và in mọi thứ theo thứ tự.

Phiên bản 238 byte của chương trình này đã tìm thấy ký tự khoảng trắng sau khi thu thập tất cả các đầu vào. Thật đau đầu vì làm như vậy liên quan đến việc tạo ra một ô chứa 0 ngay tại nơi tôi đang cố gắng lặp lại nó. Cách tôi giải quyết có tác dụng trừ 30 từ mỗi ký tự trong từ đầu tiên và 32 từ mỗi ký tự sau nó. Một phần khá lớn của mã được dành riêng để xử lý điều vô nghĩa đó.

Bây giờ, 32 được trừ khỏi mọi ký tự trong vòng lặp đầu vào, ngắn hơn và có tác dụng phụ tương tự dễ xử lý hơn. Như một phần thưởng, làm theo cách này cho phép tôi tạo nhân vật không gian của riêng mình theo cách ngắn hơn: Thay vì trừ 139 từ 171 (171 là những gì bạn nhận được khi chạy một khoảng trắng qua trình phát hiện nguyên âm ở trên), vòng lặp thêm 32 cho mỗi nhân vật đi ra ngoài để thêm 32 vào ô 171. Điều này có giá bốn byte ở đó, nhưng có nghĩa là tôi có thể trừ 171 từ nó sau (thay vì trừ 139) cho tổng số 3 byte được lưu.

Với nhận xét:

For every input character
,[

  Make a copy
  [<+<+>>-]

  Subtract 32 from one
  ++++[<-------->-]

  Subtract 97 from the other
  -[<<-->>-----]<<+++++

  If nonzero:
  [

    Subtract 4
    ----

    If nonzero:
    [

      Subtract 4
      ----

      If nonzero:
      [

        Subtract 6
        ------

        If nonzero:
        [

          Subtract 6
          ------>>

        ]

      ]

    ]

  ]

>[>>]>,]

Add 32 to every character and the 171 that the space left behind
<<++++++++[<[++++<<]<++++<[++++<<]>>[>>]>>[>>]<-]

Go to the space
<[<<]

Subtract 171 from (32 plus 171)
-[<+>---]

~~~~~~~~~~~~~~~

Ready to print!

~~~~~~~~~~~~~~~

Print letters from the second word until the value to the left is zero
>[>.>]

Go to the beginning of the first word
<[<<]<<[<<]

Look at cells to the left of letters in the first word until reaching a zero
>[>>]

Print the rest of the letters in the first word
>[.>>]

Print a space
<.

Go to the beginning of the first word
<[<<]

Print letters from the first word until the value to the left is zero
>[>.>]

Go to the beginning of the second word
>[>>]

Look at cells to the left of letters in the second word until reaching a zero
>[>>]

Print the rest of the letters in the second word
>[.>>]

vim, 23

/[aeiou]<cr>"xd0wndb0Pw"xP

Tôi tự hỏi nếu vim thực sự cạnh tranh trong thử thách này. Có lẽ không phải với các ngôn ngữ chơi gôn, nhưng có lẽ với Ruby / Python / Perl / vv.

/[aeiou]<cr>  Find the first vowel
"xd0          "Delete" (cut), to register "x, everything from here to BOL
w             Go to next word
n             Find next vowel
db            "Delete back" - delete from here to the beginning of the word
0             Go to BOL
P             Paste what we just "deleted" (cut) behind the cursor
w             Next word
"xP           Paste backwards from register "x

Python, 68 63 60 byte

import re
lambda s:re.sub('([^aeiou]+|.+ )'*3,r'\3\2\1',s,1)

Hãy thử trực tuyến trên Ideone .

Làm thế nào nó hoạt động

Chuỗi mẫu được lặp lại ba lần ( *3), dẫn đến mẫu

([^aeiou]+|.+ )([^aeiou]+|.+ )([^aeiou]+|.+ )

Tất cả các phiên bản sẽ khớp với một chuỗi các nguyên âm không trống hoặc một chuỗi không trống theo sau là một ký tự khoảng trắng.

Trường hợp đầu tiên sẽ khớp với các phụ âm ở đầu từ đầu tiên. Vì +là tham lam, nó sẽ cố gắng kết hợp càng nhiều càng tốt, tức là, tất cả cho đến nguyên âm đầu tiên.

Bởi vì điều này, trường hợp thứ hai sẽ bắt đầu ở một nguyên âm, vì vậy nó sẽ khớp với phần còn lại của từ đầu tiên, cho đến và bao gồm khoảng trắng phân tách các từ.

Tương tự như ví dụ thứ nhất, từ thứ ba sẽ khớp với tất cả các phụ âm ở đầu từ thứ hai, dẫn đến kết quả khớp thành công cho toàn bộ mẫu.

Chuỗi thô \3\2\1( rngăn Python thay thế, \3v.v. bằng các ký tự điều khiển) đảo ngược thứ tự khớp của các mẫu được ngoặc đơn, nghĩa là nó thay thế chúng bằng các phụ âm ở đầu từ thứ hai , sau đó tất cả các ký tự từ nguyên âm đầu tiên của từ đầu tiên lên đến khoảng trắng, và cuối cùng là phụ âm ở đầu từ đầu tiên.

Đối số cuối cùng để sub( 1) làm cho nó trở lại ngay sau lần thay thế thành công đầu tiên, để tránh thay thế vô nghĩa trong phần còn lại của từ thứ hai. Điều này là bắt buộc vì mẫu có thể khớp với bất kỳ chuỗi gồm ba phụ âm liên tiếp trở lên.

JavaScript (ES6), 54 byte

s=>s.replace(r=/\b[^aeiou ]+/g,(_,i)=>s.match(r)[+!i])

Giải trình

s=>
  s.replace(
    r=/\b[^aeiou ]+/g,     // r = regex to match consonants
    (_,i)=>s.match(r)[+!i] // replace consonants with the consonants from the other word
  )

Kiểm tra

var solution = s=>s.replace(r=/\b[^aeiou ]+/g,(_,i)=>s.match(r)[+!i])

<input type="text" id="input" value="plaster man" />
<button onclick="result.textContent=solution(input.value)">Go</button>
<pre id="result"></pre>

Python 3, 108 101 99 byte

(Không sử dụng regex)

Hàm này mong đợi đầu vào thông qua 2 đối số, ví dụ f('blushing','crow'). Trả về các từ mới trong một tuple.

S=lambda s,p="":s[0]in"aeiou"and(p,s)or S(s[1:],p+s[0])
def f(x,y):a,b=S(x);c,d=S(y);return c+b,a+d

Có rất nhiều giải pháp regex, vì vậy tôi muốn viết một cái gì đó không sử dụng thư viện re của Python.

Làm thế nào nó hoạt động

Phần phức tạp duy nhất là biểu thức lambda S(viết tắt có nghĩa là " S plit trước nguyên âm đầu tiên"). Nó đệ quy "lặp lại" trên từ đã cho, di chuyển một ký tự tại một thời điểm từ đầu s(bắt đầu bằng toàn bộ từ) đến cuối p(bắt đầu trống). Ở nguyên âm đầu tiên gặp phải, nó trả về (p,s), tức là (tiền tố, hậu tố). Lưu ý rằng đó là thứ tự sai so với các tham số!

Tôi nghĩ rằng nó có ý nghĩa hơn đối với thứ tự trả về là tiền tố, sau đó là hậu tố (vì nói chung tiền tố đi trước hậu tố). Thứ tự này có thể làm cho a,b=S(x)mã dễ đọc hơn một chút.

Nhưng tôi không có lựa chọn nào về thứ tự trong các tham số của lambda, vì vậy tôi không thể xác định ptrước s. Tham số đầu tiên s, phải lấy toàn bộ từ vì pcó giá trị mặc định và tham số mặc định đi sau cùng. Làm điều đó, tôi không cần phải gọi hàm Svới một chuỗi rỗng hai lần và một vài byte có thể được lưu. Tuy nhiên, có lẽ đơn giản là một quyết định tồi khi trả lại tiền tố / hậu tố theo thứ tự ngược lại vì nó được sử dụng trong biểu thức lambda.

Đối với sự lựa chọn của biểu thức lambda qua chức năng, phải mất nhiều byte để nói def S(s,p=""):returnhơn S=lambda s,p="":. Tôi có thể đưa ra lựa chọn đó vì Python có đánh giá ngắn mạch và toán tử ternary. Tuy nhiên, tôi không thể giải thích thỏa đáng về cách tôi sử dụng ngắn mạch; thật khó để lý do.

Đây là câu trả lời đầu tiên của tôi. Tôi hy vọng tôi đã làm điều này một cách chính xác, và có giá trị để đăng một giải pháp không thể thắng.

Chỉnh sửa: Bình luận viên cảm ơn: Giảm số byte một chút, hai lần và xóa thông tin không cần thiết. Đã cố gắng cải thiện chữ viết. Hy vọng không có sai lầm.

C # 6, 115 byte

string S(string a)=>System.Text.RegularExpressions.Regex.Replace(a,"([^aeiou]*)(.*) ([^aeiou]*)(.*)","$3$2 $1$4");

Nó chỉ là một nỗi đau không gian tên cho regex là quá dài.

CJam, 27 24 22 byte

2{l_{"aeiou"&}#/(N\}*o

I / O là một từ trên mỗi dòng. Hãy thử trực tuyến!

Làm thế nào nó hoạt động

2{                 }*   Do the following twice:
  l                       Read a line from STDIN.
   _                      Push a copy.
    {"aeiou"&}#           Find the index of the first character that has a non-
                          empty intersection with the string "aeiou".
               /          Split the string into chunks of that size.
                (         Shift out the first chunk, i.e., all leading consonants.
                 N\       Swap the shifted out chunk with a linefeed.
                     o  Print the topmost stack item.

Perl, 33 byte

s/([^aeiou]+)(.+ )((?1))/\3\2\1/

Đoạn mã trên dài 32 byte và yêu cầu -pchuyển đổi ( +1 byte ).

Sự thay thế này rất giống với câu trả lời Retina của @ DigitalTrauma , nhưng câu trả lời này tận dụng các mô hình đệ quy của PCRE .

Hãy thử trực tuyến trên Ideone .

Võng mạc , 34

([^aeiou]+)(.+ )([^aeiou]+)
$3$2$1

Hãy thử trực tuyến.

JavaScript ES6, 93 58 52 byte

Đã lưu 6 byte nhờ vào ETH Productstions!

x=>x.replace(/([^aeiou]+)(.+ )([^aeiou]+)/,"$3$2$1")

Kiểm tra nó! (Chỉ ES6)

F=x=>x.replace(/([^aeiou]+)(.+ )([^aeiou]+)/,"$3$2$1");

console.log=_=>u.innerHTML+=_;

console.log(`plaster man -> master plan
blushing crow -> crushing blow
litigating more -> mitigating lore
strong wrangler -> wrong strangler
def ghi -> ghef di`.split`\n`.map(e=>(e=e.split` -> `,`${e[0]} => ${e[1]} ||> `+(F(e[0])==e[1]))).join`<br>`);

html { font-family: Consolas, monospace; }

<div id=u></div>

C, 255 201 199 byte

Tôi không thấy nhiều câu trả lời C quanh đây, vì vậy hãy tận hưởng; Ngoài ra, lần đầu tiên chơi golf, đề xuất và phê bình được chào đón.

#define S(w,p)p=strpbrk(w,"aeiou")-w
#define c ;strcpy(r
#define l c+strlen(v[1])+b+1
main(int q,char**v){char r[64],S(v[1],a),S(v[2],b)c,v[2])c+b,v[1]+a);strcat(r," ")l-a,v[1])l,v[2]+b);puts(r);}

Nếu main () không bắt buộc, chúng tôi có thể lưu 24 byte, nhận được tới 179 byte

#define S(w,p)p=strpbrk(w,"aeiou")-w
#define c ;strcpy(r
#define l c+strlen(x)+b+1
s(char*x,char*y){char r[64],S(x,a),S(y,b)c,y)c+b, x+a);strcat(r," ")l-a,x)l,y+b);puts(r);}

Ung dung:

void spoonerise(char* w1, char* w2)
{
    char rt[64];

    int p1 = strpbrk(w1, "aeiou")-w1;
    int p2 = strpbrk(w2, "aeiou")-w2;

    strcpy(rt, w2);
    strcpy(rt+p2, w1+p1);

    strcat(rt, " ");

    strcpy(rt+strlen(w1)+p2+1-p1, w1);
    strcpy(rt+strlen(w1)+p2+1, w2+p2);

    puts(rt);
}

EDIT: Nhờ đề xuất của frageum, tôi đã lưu được 54 byte. = D

Python 2, 364 352 269 251 byte

EDIT: Cảm ơn rất nhiều đến @Cyoce vì đã giúp tôi chơi golf 83 byte!

Xin hãy giúp tôi chơi golf này! Dù sao, ít nhất tôi là người trả lời Python đầu tiên. Và tôi hy vọng tôi có thể đánh bại Java, nếu có câu trả lời Java!

i=input()
f=l=''
A='aeiou'
for j in A:
 I=i[0];J=I.find(j)
 if ~J:
  if f:
   if f>I[0][:J]:f=I[:J];break
  else:f=I[:J]
for j in A:
 Y=i[1];J=Y.find(j)
 if ~J:
  if l:
   if l>Y[:J]:l=Y[:J];break
  else:l=Y[:J]
print I.replace(f,l,1),Y.replace(l,f,1)

Hãy thử nó ở đây

Japt, 26 25 byte

May mắn thay, tôi đã thêm một lớp nguyên âm vào các tính năng regex của Japt vài ngày trước. Thật không may, tôi đã không thêm một lớp không nguyên âm hoặc một cách xung quanh dấu gạch chéo kép trong chuỗi regex.

#¿s4 £Uf"[^\\v]+|.+
?" gX

Các ¿nên là char thô U + 0093. Đầu vào là một chuỗi nhiều dòng, một từ / dòng. Hãy thử trực tuyến!

EDIT: Bây giờ tôi đã thêm lớp không nguyên âm \Vvà cách xung quanh \\(với %), vì vậy mã này hiện hoạt động với 21 byte : ( Dùng thử trực tuyến )

#¿s4 £Uf"%V+|.+
?" gX

Làm thế nào nó hoạt động

                     // Implicit: U = input string
#¿s4                 // Convert the char code (147) into a base-4 string "2103".
     £               // Map each char X in this string to:
      Uf"[^\\v]+|.+  //  Match each group in U of non-vowels or non-newlines,
?"                   //  with an optional trailing newline.
   gX                //  Get the item at position X in the resulting array.
                     // Implicit: output last expression

Phiên bản cũ (26 byte):

UrA="\\b[^\\v ]+"@UfA gÂ!Y

Hãy thử trực tuyến!

Làm thế nào nó hoạt động

UrA="\\b[^\\v ]+"@UfA gÂ!Y  // Implicit: U = input string
  A="\\b[^\\v ]+"           // Set variable A to this regex string, which matches
                            // a word boundary followed by one or more non-vowels.
UrA              @          // Take U and replace each match X of A and its index Y with:
                  UfA       //  Take U.match(A).
                      gÂ!Y  //  Get the item at index ~~!Y (converts 0 to 1, anything else to 0).
                            // Implicit: output last expression

Python 3, 100 (hoặc 99) byte

import re
def f(*g):a,b=[re.split("[aeiou]",r)[0] for r in g];return b+g[0][len(a):],a+g[1][len(b):]

Chơi với một vài phiên bản nhưng dường như không thể có được nó dưới đây. Có thể lấy nó xuống 99 byte bằng cách sử dụng def f(g)thay vào đó để nó có một danh sách các chuỗi chứ không phải hai chuỗi riêng biệt, nhưng tôi thích hai arg roue hơn.

Thay thế là chiều dài bằng nhau:

import re
s=re.split
def f(x,y):v="[aeiou]";a,b=s(v,x)[0],s(v,y)[0];return b+x[len(a):],a+y[len(b):]

Tôi đã thử thay thế, như @TanMath sử dụng, nhưng tôi không thể rút ngắn được nữa. Ngoài ra, TanMath có thể nhận được câu trả lời của mình ngắn hơn một byte bằng cách sử dụng "[aeiou]"thay "[aeiou]+"vì bởi vì chúng ta chỉ cần khớp với các trường hợp duy nhất. Cuối cùng, việc thực hiện input()dường như đã thay đổi giữa py2 và py3 - nó tự động đánh giá stdin như một chuỗi.

sed, 38 ký tự

s/([^aeiou]+)(.+ )([^aeiou]+)/\3\2\1/

Sử dụng biểu thức chính quy mở rộng từ giải pháp Retina .

Trên đây là 37 ký tự và yêu cầu -rchuyển đổi (+1 ký tự).

Thí dụ:

$ cat input | tee /dev/tty | sed -r 's/([^aeiou]+)(.+ )([^aeiou]+)/\3\2\1/'
plaster man
blushing crow
litigating more
strong wrangler
def ghi
master plan
crushing blow
mitigating lore
wrong strangler
ghef di

C # 6, 165 byte

string S(string a,string b){int i=V(a),j=V(b);return b.Remove(j)+a.Substring(i)+" "+a.Remove(i)+b.Substring(j);}int V(string s)=>s.IndexOfAny("aeiou".ToCharArray());

Mở rộng:

string S(string a,string b){
    int i=V(a),
        j=V(b);
    return b.Remove(j)+a.Substring(i)+" "+a.Remove(i)+b.Substring(j);
}
int V(string s)=>s.IndexOfAny("aeiou".ToCharArray());

, 24 ký tự / 42 byte

ïē/⟮(⁅ᶌ]+)⟯(.+ )Ⅰ/,`⑶⑵⑴`

Try it here (Firefox only).

Nếu bạn cần trợ giúp để hiểu điều này, điều này dịch sang ES6 là

input.replace(/([^aeiou]+)(.+ )([^aeiou]+)/g,'$3$2$1')

PowerShell, 52 byte

"$args "-replace('(.*?)([aeiou]\S+) '*2),'$3$2 $1$4'

e.g. 
PS C:\scripts\> .\Spoonerise.ps1 'blushing crow'
crushing blow

Đó là một regex thay thế bằng bốn nhóm bắt; với:

• Nhân chuỗi để mở rộng:
  • ('(.*?)([aeiou]\S+) '*2) đến '(.*?)([aeiou]\S+) (.*?)([aeiou]\S+) '
• Các "$args "mảng buộc các chuỗi args thành một chuỗi và thêm một khoảng trắng ở cuối để khoảng trống ở regex sẽ không phá vỡ nó.

JavaScript (ES6), 120 107 102 101 99 92 byte

• Cảm ơn hạ cấp!

Điều này sẽ được tính đến nếu các tham số là một đối tượng như thế này và lạc hậu:
var a = {x: "man", y:"plaster"]}

a.b=(e=>e.slice(e.search`[aeiou]`));with(a){c=b(x),d=b(y),x=x.replace(c,d);y=y.replace(d,c)}

Python, 129 108 105 109 byte

Chương trình này có một danh sách các từ như thế này ["master","plan"]

EDIT : Cảm ơn @Volatility

EDIT: Hiện đang sử dụng re.split

import re
a=re.split
c='[aeiou]+'
i,j=input()
f=a(c,i)[0]
l=a(c,j)[0]
print i.replace(f,l,1),j.replace(l,f,1)

Câu trả lời này sử dụng regex như hầu hết trong số họ làm.

Hãy thử nó ở đây

Java 8, 343 byte

Ở đây bạn có câu trả lời Java đầu tiên của bạn. Không có kinh nghiệm với việc chơi golf, vì vậy mọi đề nghị đều được đánh giá cao!

java.util.function.Function;public class C{public static void main(String[] a){Function<String, Integer>f=s->{for(int i=0;i<s.length();++i)if("aeiou".contains(s.substring(i,i+1)))return i;return 0;};int i1=f.apply(a[0]),i2=f.apply(a[1]);System.out.println(a[1].substring(0,i2)+a[0].substring(i1)+" "+a[0].substring(0,i1)+a[1].substring(i2));}}

Ung dung:

public class SpooneriseWords {
    public static void main(String[] args)
    {       
        Function<String, Integer> f = s -> {
            for(int i = 0; i < s.length(); ++i)
                if("aeiou".contains(s.substring(i, i + 1))) 
                    return i;
            return 0;
        };

        int i1 = f.apply(args[0]);
        int i2 = f.apply(args[1]);
        System.out.println(args[1].substring(0, i2) + args[0].substring(i1));
        System.out.println(args[0].substring(0, i1) + args[1].substring(i2));
    }
}

Octave, 96 byte

Nhờ các bài tập nội tuyến của Octave và chức năng 'chỉ mục ở mọi nơi', toàn bộ điều này chỉ là định nghĩa của một hàm ẩn danh duy nhất. Về cơ bản, chúng tôi xây dựng lại chuỗi thìa trong khi lưu trữ các điểm giới hạn trong avà b. Tôi đặc biệt hài lòng với fchức năng nội tuyến , tìm ra điểm giới hạn và ngăn tôi khỏi phải sử dụng toàn bộ ' find(ismember(a,b),1)' hai lần. Ngoài ra, không có regex :) .

@(p,q)[q(1:(a=(f=@(m)find(ismember(m,'aeoui'),1))(q))-1),p(b=f(q):end),32,p(1:b-1),q(a:end)];

TeaScript , 27 byte

xg/(\w+)(.+ )(\w+)/,"$3$2$1

\wlà thực sự [^aeiou].

Elixir ,143 117 byte

s=fn w->String.split_at(w,elem(hd(Regex.run(~r/[aeiou]/,w,return: :index)),0))end
{v,w}=s.(a)
{x,y}=s.(b)
[x<>w,v<>y]

Tách hai chuỗi (a, b) trên nguyên âm đầu tiên và xây dựng các chuỗi mới để trả về.

EDIT: Giảm một vài byte bằng cách sử dụng khớp mẫu thay vì các elemlệnh gọi cồng kềnh để lấy các giá trị ra khỏi bộ dữ liệu.

Java, 147 byte

Tôi giả sử chỉ là một chức năng là tốt quá.

String s(String[]i){String r="[aeiou]",f=i[0].split(r)[0],s=i[1].split(r)[0];return s+i[0].substring(f.length())+" "+f+i[1].substring(s.length());}

split(regex)không may tiêu thụ dấu phân cách, có nghĩa là tôi phải sử dụng substringđể có các hậu tố.

Bình thường, 30 28 byte

Lấy đầu vào và đưa ra đầu ra dưới dạng một danh sách của hai từ.

ACm,Kh:d"[aeiou]"3.-dKQ+V_GH

Hãy thử trực tuyến.

Python (không có biểu thức chính quy), 85 byte

t=lambda s:s[1]in'aeiou'or-~t(s[1:])
lambda a,b:(b[:t(b)]+a[t(a):],a[:t(a)]+b[t(b):])

Chạy mẫu:

>>> t=lambda s:s[1]in'aeiou'or-~t(s[1:])
>>> lambda a,b:(b[:t(b)]+a[t(a):],a[:t(a)]+b[t(b):])
<function <lambda> at 0x7f495e534398>
>>> _('plaster', 'man')
('master', 'plan')

tlà một hàm đệ quy tính toán chỉ số của nguyên âm sớm nhất sau ký tự đầu tiên trong đối số của nó s. Nếu ký tự thứ hai s[1]là nguyên âm, nó đánh giá True, có intgiá trị 1. Mặt khác, nó thực hiện một cuộc gọi đệ quy với ký tự đầu tiên được loại bỏ và thêm 1 vào chỉ mục kết quả bằng cách sử dụng -~(phần bù hai của phần bù của một). Cuối cùng, kết quả của tđược sử dụng như các chỉ số để cắt chuỗi để tính toán công cụ muỗng.

GNU Awk 4.0, 48 ký tự

split($0,a,/\<[^aeiou]+/,s)&&$0=s[2]a[2]s[1]a[3]

Chạy mẫu:

bash-4.3$ for s in 'plaster man' 'blushing crow' 'litigating more' 'strong wrangler' 'def ghi'; do
>     echo -n "$s -> "
>     awk 'split($0,a,/\<[^aeiou]+/,s)&&$0=s[2]a[2]s[1]a[3]' <<< "$s"
> done
plaster man -> master plan
blushing crow -> crushing blow
litigating more -> mitigating lore
strong wrangler -> wrong strangler
def ghi -> ghef di

PowerShell, 61 byte

"$args"-replace'([^aeiou]+)(.*)\s([^aeiou]+)(.*)','$3$2 $1$4'

Sử dụng regex để hoán đổi các ký tự không nguyên âm đầu tiên của mỗi từ