Biorąc pod uwagę pozycję z rzędem wież i / lub pustych przestrzeni, wypisz ile różnych ruchów wież jest możliwych. Wieża może przesunąć się w lewo lub w prawo na puste miejsce, ale nie na takie, które wymaga przejścia przez inną wieżę. Kiedy wieża się porusza, pozostałe wieże pozostają na swoim miejscu.

Na przykład z tej pozycji możliwe jest 6 ruchów :

.R..RRR.

• Pierwsza (lewa skrajna) wieża może przesunąć się o 1 pole w lewo lub 1 lub 2 pola w prawo (3 ruchy)
• Następna wieża może przenieść tylko 1 lub 2 pola do końca (2 ruchy)
• Trzecia wieża w ogóle się nie porusza, ponieważ jest wciśnięta między dwie inne wieże (0 ruchów)
• Ostatnia wieża może przesunąć tylko 1 pole w prawo (1 ruch)

Zauważ, że pozycja może w ogóle nie mieć wież lub w ogóle nie mieć pustych miejsc.

Dane wejściowe: niepusta lista (łańcuch, tablica itp.) Wież i pustych spacji. Możesz przedstawić je jako True/ False, 1/ 0, 'R'/ '.'lub dowolne dwa spójne odrębne jednobajtowe znaki lub jednocyfrowe liczby do wyboru. Od Ciebie zależy, która z nich oznacza wieżę, a która pustą przestrzeń.

Dane wyjściowe: nieujemna liczba całkowita. Również liczby zmiennoprzecinkowe są w porządku.

Przypadki testowe

Dane wyjściowe to liczba po lewej stronie.

6 .R..RRR.
0 .
0 R
4 R..RR
3 ...R
8 ..R..R..
0 ......

Aby uzyskać więcej przypadków testowych, tutaj są wszystkie dane wejściowe do długości 5.

0 .
0 R
0 ..
1 .R
1 R.
0 RR
0 ...
2 ..R
2 .R.
1 .RR
2 R..
2 R.R
1 RR.
0 RRR
0 ....
3 ...R
3 ..R.
2 ..RR
3 .R..
3 .R.R
2 .RR.
1 .RRR
3 R...
4 R..R
3 R.R.
2 R.RR
2 RR..
2 RR.R
1 RRR.
0 RRRR
0 .....
4 ....R
4 ...R.
3 ...RR
4 ..R..
4 ..R.R
3 ..RR.
2 ..RRR
4 .R...
5 .R..R
4 .R.R.
3 .R.RR
3 .RR..
3 .RR.R
2 .RRR.
1 .RRRR
4 R....
6 R...R
5 R..R.
4 R..RR
4 R.R..
4 R.R.R
3 R.RR.
2 R.RRR
3 RR...
4 RR..R
3 RR.R.
2 RR.RR
2 RRR..
2 RRR.R
1 RRRR.
0 RRRRR

Siatkówka , 14 9 bajtów

w`_+R|R_+

Wypróbuj online! Link zawiera przypadki testowe. Wykorzystuje _puste miejsce, ponieważ jest to najprzyjemniejsza postać nieregexowa. Działa poprzez zliczanie liczby podciągów, które odpowiadają prawidłowemu ruchowi Wieży. Podciąg jest prawidłowym ruchem Wieży, jeśli zawiera co najmniej jeden _plus pojedynczy Rna początku lub na końcu.

Python 3 , 30 29 bajtów

lambda s:sum((s+s).strip())/9

Wypróbuj online!

-1 bajt dzięki @JoKing

Funkcja pobiera ciąg bajtów Python jako dane wejściowe. Każde puste miejsce jest kodowane jako tabulator, a każda wieża jest kodowana jako bajt b'\x00'mający wartość 0.

Obliczenia są równoważne z lambda s:(s+s).strip().count(b'\t')mniejszą liczbą bajtów.

JavaScript (ES6),  38  33 bajtów

Zaoszczędź 5 bajtów dzięki @JoKing

Pobiera dane wejściowe jako ciąg. Oczekuje miejsca na pusty kwadrat i każdą inną postać na wieżę.

s=>(s+s).trim().split` `.length-1

Wypróbuj online!

Skomentował

s =>          // s = input, e.g. " R  RRR "
  (s + s)     // double -> " R  RRR  R  RRR "
  .trim()     // remove leading and trailing spaces -> "R  RRR  R  RRR"
  .split` `   // split on spaces -> [ 'R', '', 'RRR', '', 'R', '', 'RRR' ]
  .length - 1 // return the length - 1 -> 6

Python 2 ,  40  33 bajtów

Zaoszczędź 7 bajtów dzięki @Grimy

lambda s:(s+s).strip().count(' ')

Wypróbuj online!

Japt , 5 bajtów

²x èS

Spróbuj

²x èS        Implicit input string of U
²            U + U
 x           Remove trailing and leading whitespace
   èS        Number of spaces

Perl 6 , 16 bajtów

{+m:ex/s+R|Rs+/}

Wypróbuj online!

Wyrażenie regularne, które pasuje do wszystkich wyczerpujących wystąpień wież, po których występują spacje lub spacje, po których następuje wieża, i zwraca liczbę dopasowań.

05AB1E , 5 bajtów

«ðÚð¢

Wypróbuj online!

«       # concatenate the input with itself
 ðÚ     # remove leading and trailing spaces
   ð¢   # count spaces

Siatkówka , 23 15 bajtów

Dwukrotnie spacja między wieżami, linie grep z co najmniej jedną wieżą, a następnie policz liczbę spacji.

R.+R
$0$0
G`R
 

Wypróbuj online!

Chociaż program używa spacji zamiast kropek, dodałem kod prefiksu, aby podane przypadki testowe można było łatwo wkleić i użyć.

Miałem nadzieję, że uda mi się użyć nakładających się meczów (?<=R.*) | (?=.*R), ale nakładanie się nie jest aż tak agresywne. Musi liczyć wszystkie możliwe sposoby uzyskania dopasowania, aby zwrócić prawidłowy wynik za pomocą tej metody.

Galaretka , 6 bajtów

t1;ḟẠS

Wypróbuj online!

Monadyczny link pobierający listę 0forów i 1spacji i zwracający liczbę całkowitą z liczbą ruchów. Link TIO pobiera wklejoną listę możliwych tablic podanych w pytaniu, konwertuje do odpowiedniego formatu, a następnie wyświetla obliczone i poprawne odpowiedzi.

Wyjaśnienie

t1     | Trim 1s from end
  ;    | Concatenate to input
   ḟẠ  | Filter out 1s if all input were 1s, otherwise filter out 0s
     S | Sum

Japt , 6 bajtów

Miejsca na spacje, każda inna postać dla wież.

²x ¸ÊÉ

Spróbuj

Ślimaki, 7 bajtów

Przynajmniej bije Retinę :)

o
\.+\R

Wypróbuj online!

Galaretka , 5 bajtów

ḲẈ+ƝS

Wypróbuj online!

-1 dzięki Jonathan Allan .

0reprezentują wieżę, 1reprezentują pustą przestrzeń.

Stax , 7 6 5 bajtów

àσQ█ε

Uruchom i debuguj

Użyj tabu dla pustego kwadratu i dowolnej innej postaci dla wieży.

C (brzęk) , 57 bajtów

i,r,o;g(*n,z){for(o=r=i=0;z--;i=-~i*!*n++)o+=*n?r=1,i:r;}

Wypróbuj online!

• Zapisano 1 dzięki @ceilingcat

Uświadomiłem sobie, że to nie działa na puste listy .. Teraz to działa! Plus zaoszczędziłem trochę bajtów!

1 = wieża. 0 = spacja.

for (.. i + = n ++? - i: 1) // zlicza spacje lub resetuje dodatkowe ruchy => i = - ~ i ! * n ++ (@ceilingcat)

o + = * n? r = 1, i: r; // dodaje do wyniku -i- (dodatkowe ruchy), gdy wieża jest spełniona plus zestawy -r- (wieża spełniona), -i- zostanie wyczyszczone w celu zwiększenia zdania.

dodaje -r- do każdego miejsca (gwarantowane spełnienie wieży)

Haskell , 36 bajtów

f s=sum$snd.span(>0)=<<[s,reverse s]

Wypróbuj online!

Używa 1 do pustej przestrzeni, 0 do wieży. Zlicza liczbę jedynek nie w początkowym bloku jedynek i dodaje ją do wyniku dla odwróconego ciągu.

Haskell , 33 bajty

sum.(t.reverse<>t)
t=snd.span(>0)

Wypróbuj online!

Anonimowa funkcja, która przyjmuje dane wejściowe jako listę 1s (spacje) i 0s (gawrony). Spowoduje to przycięcie spacji od początku i końca listy, a następnie połączy dwie wersje listy i zsumuje je.

Wykorzystuje GHC 8.4.1 lub nowszy, aby mieć dostęp do <>operatora bez importowania go.

Python 2 , 59 bajtów

def f(r):S=map(len,r.split('R'));return sum(S)*2-S[0]-S[-1]

Wypróbuj online!

Japt , 6 bajtów

²x ¸ÊÉ

Wypróbuj online

Wolfram Language (Mathematica) , 43 38 bajtów

Count[Subsequences@#,{0,1..}|{1..,0}]&

Wypróbuj online!

Rozwiązanie Port of Neil's Retina . Używa 1 dla spacji i 0 dla wież.

Haskell , 68 58 54 bajtów

(n#y)(a:x)|a<1=n+(0#1)x|m<-n+1=y+(m#y)x
(_#_)x=0
f=0#0

Wypróbuj online!

Czerwony , 46 bajtów

func[s][length? next split trim append s s sp]

Wypróbuj online!

Tylko czerwony port rozwiązań JavaScript / Python firmy Arnauld . Zajmuje miejsce jako pusty kwadrat.

Java 11, 35 32 bajtów

s->(s+s).strip().chars().sum()/9

Port odpowiedzi @Joel na Python 3 .
-3 bajty również dzięki @Joel .

Używa NULL-bytes ( \0) dla wież i tabs ( \t) dla spacji.

Wypróbuj online.

Próbowałem użyć s->(s+s).trim().chars().sum()/9początkowo jako 31-bajtowego, ale to nie działa, ponieważ String#trimwbudowane nie tylko usuwa początkowe i końcowe spacje / tabulatory / nowe linie, ale także wszystkie inne bajty, które są mniejsze lub równe U+0020(Unicode 32; spacja) , więc będzie to usunąć NULL bajty jak dobrze ..
Dzięki Joel polecając mi nową Java 11+ String#strippolecenie wbudowane (które zapomniałem dodali) jako alternatywa. Ten usuwa również części końcowe / wiodące, ale w tym przypadku tylko białe znaki , więc zachowane są bajty NULL.

Wyjaśnienie:

s->                              // Method with String as parameter & integer return-type
  (s+s)                          //  Concatenate the input to itself
       .strip()                  //  Then trim all leading and trailing tabs
               .chars().sum()    //  Sum the unicode values of the remaining characters
                             /9  //  And divide it by 9 to get the amount of remaining tabs

Perl 5 -MList::Util=sum -pF/R/ , 40 bajtów

$\=2*sum map$_=y///c,@F}{$\-="@F"+$F[-1]

Wypróbuj online!

C # (interaktywny kompilator Visual C #) , 27 bajtów

x=>(x+x).Trim().Sum(d=>d)/9

Zapisano bajt dzięki @someone

Wypróbuj online!

Stax , 7 6 bajtów

-1 bajt dzięki rekurencyjnemu

╣ë|óêπ

Uruchom i debuguj

Befunge-98 (PyFunge) , 73 bajty

#;ep10fp#;>#v~:'.-#v_$1+0k
v0+ge0*gf0$_v#!-R':<
>ep20fp   v >0fg1-*0eg+.@

Wypróbuj online!

C , 183 156 151 137 96 91 bajtów

Dzięki pułapowi catcat za 91 bajtów.

c,e;char*z,b[9];main(d){for(gets(z=b);e=*z>81?c-=e*~!d,d=0:e+1,*++z;);printf("%i",d?:c+e);}

R to wieża, wszystko inne to przestrzeń.

TIO

Pyth , 7 bajtów

/r6*2Qd

Wypróbuj online!

Pobiera ciąg znaków Rdla wież, (spacja) dla pustych miejsc

/     d  # Count spaces in
 r6      #  Strip spaces from
   *2Q   #   2 * input() (= concatenation)

x86-64 - 26 bajtów

Dane wejściowe to tablica zawierająca do 32 bitów i liczba całkowita reprezentująca liczbę kwadratów, 1 reprezentuje wieżę, 0 oznacza pustą.

C4 E2 69 F7 C1       shlx        eax,ecx,edx
0B C1                or          eax,ecx  
F3 0F BC C8          tzcnt       ecx,eax  
D3 E8                shr         eax,cl  
F3 0F BD C8          lzcnt       ecx,eax  
F7 D0                not         eax  
F3 0F B8 C0          popcnt      eax,eax  
2B C1                sub         eax,ecx  
C3                   ret  

Kopiuje bity, tak aby były dodawane po lewej stronie i usuwa końcowe bity zerowe. Następnie pobiera liczbę wiodących zerowych bitów i odejmuje ją od całkowitej liczby zerowych bitów.

x86-64 Kod maszynowy - 22 bajty - tylko szeregi szachowe zwykłej długości.

Dane wejściowe to 32-bitowa liczba całkowita z najmniej znaczącym bajtem złożonym z 8 bitów reprezentujących wieże. 1 to wieża, 0 jest pusta.

8A E9                mov         ch,cl  
91                   xchg        eax,ecx
F3 0F BC C8          tzcnt       ecx,eax
D3 E8                shr         eax,cl 
F3 0F BD C8          lzcnt       ecx,eax
F7 D0                not         eax  
F3 0F B8 C0          popcnt      eax,eax
2B C1                sub         eax,ecx
C3                   ret  

Kopiuje bity do następnego znaczącego bajtu i usuwa końcowe bity zerowe. Następnie pobiera liczbę wiodących zerowych bitów i odejmuje ją od całkowitej liczby zerowych bitów.