พื้นหลัง

ขณะนี้ฉันอยู่ใน AP Comp Sci A: คลาส Java และฉันต้องการเริ่มเพื่อนบางคนของฉันเกี่ยวกับการตีกอล์ฟ ฉันมีความท้าทายจากหลักสูตรและฉันต้องการดูว่ามีกี่ไบต์ที่ชุมชนสามารถทำสิ่งนี้ได้

รายละเอียดการท้าทาย:

กำหนดสตริงอินพุตสองสตริงคือสตริงหลักและสตริง pivot ให้ทำดังนี้:

ถ้าสตริงเดือยเป็นสิ่งที่ครั้งหนึ่งเคยเป็น substring ของสตริงหลักส่วนหนึ่งของสตริงหลักที่มาก่อนสตริงเดือยจะต้องสลับกับส่วนหนึ่งที่เกิดขึ้นหลังจากที่ในขณะที่การรักษาสินค้าได้ภายใน subtrings กล่าวถูกเปลี่ยน

ตัวอย่างเช่น:

หากสตริงสาระสำคัญว่างเปล่าหรือไม่พบสตริงสาระสำคัญภายในสตริงหลักโปรแกรมไม่จำเป็นต้องกำหนดพฤติกรรมไว้

หากมีมากกว่าหนึ่งอินสแตนซ์ของสตริงเดือยการแยกควรเกิดขึ้นในอินสแตนซ์แรกและอินสแตนซ์แรกเท่านั้นของเดือย

ตัวอย่าง: ให้สตริงหลักOneTwoThreeTwoOneและสตริงเดือยผลผลิตที่ควรจะเป็นTwoThreeTwoOneTwoOne

ได้รับสตริงหลัก1Two2Two3Two4และหมุนเอาท์พุทที่ควรจะเป็นTwo2Two3Two4Two1

ได้รับสตริงหลักOneTwoThreeและสตริงเดือย "สอง" ThreeTwoOneเอาท์พุทที่ควรจะเป็น รับสายหลักthe rabbit is faster than the turtleและสายหมุน

 is faster than 

(หมายเหตุพื้นที่เดียวต่อท้ายและก่อนหน้านี้) the turtle is faster than the rabbitเอาท์พุทที่ควรจะเป็น

ได้รับสตริงหลัก1-2-3-4-5-6และหมุนเอาท์พุทที่ควรจะเป็น-2-3-4-5-6-1

เล่ม:

นี่เป็นคำถามแรกของฉันเกี่ยวกับการตีกอล์ฟดังนั้นถ้าคุณมีข้อเสนอแนะหรือคำวิจารณ์ที่สร้างสรรค์คุณสามารถพูดอย่างนั้นได้

นอกจากนี้รหัสของฉันสำหรับโครงการนี้ (เขียนด้วยภาษา Java เพราะหลักสูตรเน้นที่เรื่องนั้น) ดูได้ที่ด้านล่าง หากคุณมีคำแนะนำใด ๆ ฉันชอบที่จะเห็นพวกเขา ขณะนี้มีขนาด 363 ไบต์ แต่ฉันคิดว่าคุณสามารถสร้างโซลูชันที่ดีและเล็กลงได้

import java.util.Scanner;interface Main{static<T>void D(T f){System.out.println(f);}static void main(String[]A){Scanner s=new Scanner(System.in);D("Enter the first String:");String a=s.nextLine();D("Enter the pivot String:");String p=s.nextLine();if(p.isEmpty()|!a.contains(p)){D("Error: Pivot String not found.");return;}String w[]=a.split(p,2);D(w[1]+p+w[0]);}}

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

Mathematica ขนาด 42 ไบต์

Reverse@StringSplit[##,2]~StringRiffle~#2&

ลองออนไลน์!

เยลลี่ 6 ไบต์

œṣṙ1j⁴

ลองออนไลน์!

คำอธิบาย

œṣṙ1j⁴  Main Link
œṣ      Split around sublists equal to the pivot
  ṙ1    Rotate left by one
    j⁴  Rejoin on the pivot

Python 2 , 37 39ไบต์

lambda a,b:b.join(a.split(b,1)[::-1])

aสตริงหลักอยู่ที่ไหนและbเป็นสตริงเดือย

ลองออนไลน์!

ภาษา Wolfram (Mathematica) , 34 ไบต์

p#2<>p<>#&@@StringSplit[#,p,2]&

ลองออนไลน์!

ฟังก์ชั่นที่ไม่มีชื่อ curried ซึ่งควรจะเรียกด้วยเดือยแรกและสายหลักที่สอง เช่นถ้าคุณมอบหมายฟังก์ชั่นให้กับชื่อf:

f["-"]["1-2-3-4-5-6"]

โอห์ม v2 , 4 ไบต์

ïλ⁴j

ลองออนไลน์!

Perl 5 , 20 + 2 ( -pl) = 22 ไบต์

<>=~/$_/;$_="$'$_$`"

ลองออนไลน์!

รับสตริง pivot บนบรรทัดแรกจากนั้นสตริงเต็มในวินาที

Python 2 , 53 44 ไบต์

ขอบคุณThePlasmaRailgunสำหรับบางไบต์

p,m=input()
k=m.split(p,1)
print k[1]+p+k[0]

ลองออนไลน์!

Python 2 , 37 ไบต์

lambda a,b:b.join(a.split(b,1)[::-1])

ลองออนไลน์!

C # (Visual C # Compiler) , 56 ไบต์

(m,p)=>(m+p+m).Substring(m.IndexOf(p)+p.Length,m.Length)

ลองออนไลน์!

อลิซอายุ 18 ไบต์

/?.?.Qz
\IoI%!oo@/

ลองออนไลน์!

คำอธิบาย

/...
\...@/

นี่เป็นเพียงกรอบงานสำหรับโค้ดโหมดเชิงเส้น Ordinal (การประมวลผลสตริง) ตีแผ่การควบคุมการไหลของซิกแซกเราได้รับ:

I.I.!zo?o?%Qo

I.  Read the first string, duplicate it.
I   Read the second string (the pivot).
.!  Store a copy of the pivot on the tape.
z   Drop. Removes everything up to and including the pivot from the first string,
    so we get only the stuff after the pivot.
o   Output that.
?o  Retrieve the pivot from the tape and output it.
?%  Retrieve the pivot again and split the input around (all occurrences of)
    the pivot.
Q   Reverse the stack.
o   Output the top of the stack (i.e. the chunk in front of the first pivot).

SOGL V0.12 , 9 5 ไบต์

ΘK+,∑

ลองที่นี่!

คำอธิบาย:

Θ      split the 2nd input on the 1st one
 K     get the 1st element
  +    and add it to the end
   ,∑  join on the 1st input

เรติน่า24 24ไบต์

รถถังมาร์ตินเอนเดอร์ -1 ไบต์

(.*)¶(.*?)\1(.*)
$3$1$2

ลองออนไลน์!

Python 2 , 48 ไบต์

lambda s,p:p.join(s.split(p)[1:]+s.split(p)[:1])

ลองออนไลน์!

Pyth , 8 ไบต์

jQ.<cEQ1

ลองที่นี่!

คำอธิบาย

jQ.<cEQ1 - Full program.

    cEQ  - Split the second input by the first input.
  .<   1 - Cyclically rotate by 1 place to the left.
jQ       - Join on the first input.

ถ่าน 13 ไบต์

≔⪪θηθ⪫Ｅθ§θ⊕κη

ลองออนไลน์! การเชื่อมโยงคือการใช้รหัสเวอร์ชันอย่างละเอียด คำอธิบาย:

  θ             First input
   η            Second input
 ⪪              Split
≔   θ           Assign result
      Ｅθ        Map over result
           κ    Current index
          ⊕     Incremented
        §θ      Circularly index into result
     ⪫      η   Join
                Implicitly print

R , 63 58 57 ไบต์

function(M,P)sub(sub("_",P,"(.+?)(_)(.+)"),"\\3\\2\\1",M)

ลองออนไลน์!

Mเป็นสายหลักPคือเดือย

คำตอบจอประสาทตาของ ovsระบุว่าฉันสามารถซ่อมแซมความพยายามก่อนหน้าของฉันด้วยวิธี regex

(.+)(Pivot string)(.+)

โดยเพิ่ม?กลุ่มการจับภาพแรก

Java 8, 47 ไบต์

x->y->x.replaceAll("(.*?)("+y+")(.*)","$3$2$1")

ลองออนไลน์

JavaScript (ES6), 41 40 ไบต์

(s,p,[a,...r]=s.split(p))=>r.join(p)+p+a

กรณีทดสอบ

let f =

(s,p,[a,...r]=s.split(p))=>r.join(p)+p+a

console.log(f('the rabbit is faster than the turtle', ' is faster than '))
console.log(f('1-2-3-4-5-6', '-'))

J , 14 ไบต์

#@[}.{.@ss|.,~

มันทำงานอย่างไร:

อาร์กิวเมนต์ซ้ายคือ pivot หนึ่งอันที่ถูกต้อง - สตริงที่จะย้อนกลับ

            ,~   appends the pivot to the string
     {.@ss       finds the positions of the pivot in the string and takes the first one
          |.     rotates the appended string to the left, so that the pivot is at the start
#@[              finds the length of the pivot string (n)
   }.            drops n characters from the begining of the rotated string

ลองออนไลน์!

C,  106  100 ไบต์

i,l;f(s,p)char*s,*p;{l=strlen(p);for(i=0;strncmp(s+i,p,l);++i);printf("%s%s",s+i+l,p);write(1,s,i);}

ลองออนไลน์!

SNOBOL4 (CSNOBOL4) , 53 ไบต์

	P =INPUT
	INPUT ARB . R P REM . L
	OUTPUT =L P R
END

ลองออนไลน์!

รับอินพุตเป็น Pivot จากนั้น Main คั่นด้วยบรรทัดใหม่

นี้เป็นพื้นเทียบเท่า SNOBOL ของคำตอบ R ของฉัน

Perl 6 , 31 ไบต์

->$_,$b {S/(.*?)$b(.*)/$1$b$0/}

ทดสอบมัน

PHP, 62 ไบต์

<?=![,$s,$p]=$argv,preg_filter("(^(.*)$p(.*)$)U","$2$p$1",$s);

ต้องการ PHP 7.1; อาจล้มเหลวหาก pivot มีตัวอักษรพิเศษ regex ( \+*?[^]$(){}=!<>|:-)
ไม่มีการเปลี่ยนแปลงหาก Pivot ว่างเปล่าเอาต์พุตว่างถ้า Pivot ไม่ได้อยู่ในอินพุต ทำงานด้วย
-n

รุ่นที่ปลอดภัย, 77 ไบต์:

<?=preg_filter("(^(.*)".preg_quote($p=$argv[1])."(.*)$)U","$2$p$1",$argv[2]);

ไม่มีการเปลี่ยนแปลงหาก Pivot ว่างเปล่าเอาต์พุตว่างถ้า Pivot ไม่ได้อยู่ในอินพุต ทำงานด้วย
-n

รุ่นที่ไม่ใช่ regex, 71 ไบต์:

$a=explode($p=$argv[2],$argv[1]);$a[]=array_shift($a);echo join($p,$a);

ให้คำเตือนถ้า Pivot ว่างเปล่า ไม่มีการเปลี่ยนแปลงหาก Pivot ไม่ได้อยู่ในอินพุต

-nrทำงานด้วย

ลองพวกเขาออนไลน์

สีแดง 63 ไบต์

f: func[p s][rejoin[copy find/tail s p p copy/part s find s p]]

ลองออนไลน์!

Swift , 131 ไบต์

import Foundation
func f(s:String,d:String){var c=s.components(separatedBy:d);print((c+[c[0]]).suffix(from:1).joined(separator:d))}

คำอธิบาย (ungolfed)

import Foundation                     // Import String.components
func f(s:String,d:String){
    var c=s.components(separatedBy:d) // Split the input string by the separator
    print((c+[c[0]])                  // Add the last element of c ([A,B,C] -> [A,B,C,A])
        .suffix(from:1)               // Remove the first element  ([A,B,C,A] -> [B,C,A])
        .joined(separator:d))         // Join with the separator
}

C (gcc) , 76 ไบต์

f(s,t)char*s,*t;{char*p=strstr(s,t);printf("%s%s%.*s",p+strlen(t),t,p-s,s);}

ลองออนไลน์!

C ++ 11, 64 ไบต์

[s,p,&a]{int f=s.find(p);a=s.substr(f+p.size())+p+s.substr(0,f);}

แลมบ์ดาซึ่งจับสตริง s, p และ a, พร้อมกับเป็นข้อมูลอ้างอิง (เข้า - ออก)

รหัสทดสอบ

#include <iostream>
#include <string>

std::string Test(std::string s, std::string p) {
    std::string a;
[s,p,&a]{int f=s.find(p);a=s.substr(f+p.size())+p+s.substr(0,f);}();
    return a; 
}

int main() {
    std::string 
        s = "OneTwoThreeTwoOne",
        p = "Two",
        r = "ThreeTwoOneTwoOne";
    auto a = Test(s,p);
    std::cout << ((a==r)?"OK":"Failed") << ": " << a << std::endl; 

    return 0;
}

ทำความสะอาด , 83 ไบต์

import StdEnv;f s c=(\p=p takeWhile++[hd s,c:p dropWhile])\g=reverse(tl(g((<>)c)s))

Stringในสะอาดเป็นปกติ{#Char}- ค่าไม่มีกล่อง ( #) Chararray ( {}) ฟังก์ชันนี้ใช้[Char]แทนStringซึ่งเป็นรุ่นที่สองที่ถูกต้องของStringซึ่งเป็นสองรุ่นที่ถูกต้อง

ฟังก์ชั่นลายเซ็นเต็มรูปแบบคือ f :: [.t] .t -> [.t] | [.t <= Char]ลายเซ็นเต็มฟังก์ชั่น

ลองออนไลน์!

Japt , 8 7 ไบต์

£Zg°Y}V

ลองที่นี่