Поворот "робиться шляхом розбиття струни на дві частини та зміни їх порядку" . Об'єкт є симетричним під час операції, якщо об'єкт не змінюється після застосування зазначеної операції. Отже, "обертальна симетрія" - це той факт, що струна залишається незмінною після "обертання".

З огляду на не порожній рядок, sщо складається лише з літер від aдо z, вивести найвищий порядок обертової симетрії рядка.

Тести:

input        output
a            1
abcd         1
abab         2
dfdfdfdfdfdf 6

Це є код-гольф. Найкоротша відповідь у байтах виграє. Застосовуються стандартні лазівки .

Сітківка , 15 байт

(^.+?|\1)+$
$#1

Спробуйте в Інтернеті!

Відповідає цілому рядку, повторюючи підрядку (коротші підряди є пріоритетними через недоступність .+?) та замінює всю нитку на кількість використаних нами повторів.

Желе , 3 байти

ṙJċ

Спробуйте в Інтернеті!

05AB1E , 8 байт

gGDÀ})QO

Спробуйте в Інтернеті!

Пояснення

gG  }      # len(input)-1 times do:
  D        # duplicate
   À       # rotate left
     )     # wrap result in a list
      Q    # compare each to input for equality
       O   # sum

Пітон, 31 байт

lambda s:len(s)/(s+s).find(s,1)

Знайдіть перший ненульовий індекс sу, s+sщоб зрозуміти, наскільки нам потрібно повернути його, щоб sповернутися, а потім розділіть довжину sна це число. Спираючись на ідеї, які я бачив в іншому місці .

Пролог (SWI) , 64 байти

A+B:-findall(X,(append(X,Y,A),append(Y,X,A)),[_|Z]),length(Z,B).

Спробуйте в Інтернеті!

Визначає предикат, +/2який приймає рядок (у вигляді списку кодів символів) як свій перший аргумент ( A) і встановлює свій другий аргумент ( B) у порядку симетричного обертання вищого порядку.

Пояснення

Ця програма використовує той факт, що безліч симетричних обертів на рядку є циклічною групою, і тому порядок набору симетричних обертів дорівнює порядку симетричного обертання вищого порядку. Таким чином програма здатна обчислити бажаний результат, знайшовши загальну кількість симетричних обертів на вхідній рядку.

Пояснення коду

Більшість важких підйомів здійснюється за викликом до findall/3присудка. findall/3Предикат знаходить все різні можливі значення для першого аргументу ( Xв даному випадку) , так що вираз , наведене в якості другого аргументу є істинним ( (append(X,Y,A),append(Y,X,A)), про це пізніше). Нарешті, воно зберігає кожне з цих можливих значень Xяк список у заключному аргументі ( [_|Z]).

Вираз, переданий findall/3як другий рухомий фрагмент, (append(X,Y,A),append(Y,X,A))використовує append/3присудок, щоб вказати, що Xоб'єднане з деяким ще не визначеним Yрівнем має бути Aвхідним рядком, а також те, що Yз'єднане з цим Xтакож повинно бути рівним A. Це означає, що Xповинен бути якийсь такий префікс A, що якщо його вилучити з передньої частини Aта додати до задньої частини, то результуюча рядок буде такою самою, як A. Множина Xs з цією властивістю майже має однозначну відповідність симетричним обертанням A. Завжди рівно один випадок подвійного підрахунку, який викликаний тим, що як порожній рядок, так і AпрефіксиAякі відповідають 0-обертанню A. Оскільки 0-обертання Aзавжди симетричне, довжина результуючого списку Xs від findall/3буде на один більша, ніж кількість симетричних обертань на A.

Для вирішення задачі подвійного підрахунку я використовую відповідність шаблону на третьому аргументі findall/3присудка. У списках Пролога представлені у вигляді пар голови (перший елемент) та хвоста (решта). Таким чином, [_|Z]представлений список, хвіст якого дорівнює, дорівнює Z. Це означає, що довжина на Zодин менше кількості префіксів, знайдених findall/3присудком і, таким чином, дорівнює кількості симетричних обертів A. Нарешті, я використовую length/2присудок, щоб встановити Bдовжину Z.

JavaScript (ES6), 42 41 байт

Збережено 1 байт завдяки @ l4m2

s=>s.length/s.match`(.+?)\\1*$`[1].length

Тестові справи

let f =

s=>s.length/s.match`(.+?)\\1*$`[1].length

console.log(f("a"))            // 1
console.log(f("abcd"))         // 1
console.log(f("abab"))         // 2
console.log(f("dfdfdfdfdfdf")) // 6

Japt , 7 байт

¬x@¥UéY

Перевірте це в Інтернеті!

Пояснення

 ¬ x@   ¥ UéY
 q xXY{ ==UéY}  // Expanded
Uq xXY{U==UéY}  // Variable introduction
                // Implicit: U = input string
Uq              // Split U into chars.
   xXY{      }  // Map each item X and index Y by this function, then sum the results:
       U==UéY   //   Return U equals (U rotated by Y characters).
                // Implicit: output result of last expression

PHP, 66 байт

for(;strtr($a=$argn,[substr($a,0,++$i)=>""]););echo strlen($a)/$i;

Спробуйте в Інтернеті!

PHP, 67 байт

preg_match('#^(.+?)\1*$#',$argn,$t);echo substr_count($argn,$t[1]);

Спробуйте в Інтернеті!

C (gcc) , 59 байт

-Df(d,s)=for(d=n=strlen(s);n%d|memcmp(s,s+n/d,n-n/d);d--)

n;

Спробуйте в Інтернеті!

Хаскелл , 49 байт

g x=sum[1|a<-[1..length x],drop a x++take a x==x]

Спробуйте в Інтернеті!

Хаскелл , 49 байт

g x=sum[1|(a,_)<-zip[1..]x,drop a x++take a x==x]

Спробуйте в Інтернеті!

Пояснення

Для цього використовується просте рішення @ 0 '. Оскільки обертання рядка утворюють циклічну групу, елемент вищого порядку такий же, як і розмір групи, таким чином ми можемо отримати порядок одиниці, знайшовши кількість симетричних обертів.

Коди прості - це розуміння списку і підраховує кількість обертів, які зберігають початковий рядок.