Bir verilen mgöre nçikolata, m,niçine çubuğu kırmak için yollar pozitif çıkış sayısı mn, her ara bir ızgara çizgisinin oluşur 1 1 ile parçalar.

Düzen önemlidir. Parçalar da ayırt edilebilir, bu nedenle 1 ila 3 çikolata çubuğunun her iki ucundaki iki parça eşdeğer değildir.

Örneğin, 2 2 blok için:

 _ _            _   _            _   _            _   _
|_‖_|    ->    |‗| |_|    ->    |_| |‗|    ->    |_| |_|
|_‖_|          |_| |_|           _  |_|           _   _
                                |_|              |_| |_|


 _ _            _   _            _   _            _   _
|_‖_|    ->    |_| |‗|    ->    |‗| |_|    ->    |_| |_|
|_‖_|          |_| |_|          |_|  _            _   _
                                    |_|          |_| |_|


 _ _            _ _              _   _            _   _
|‗|‗|    ->    |_‖_|      ->    |_| |_|    ->    |_| |_|
|_|_|           _ _               _ _             _   _
               |_|_|             |_‖_|           |_| |_|


 _ _            _ _               _ _             _   _
|‗|‗|    ->    |_|_|      ->     |_‖_|    ->     |_| |_|
|_|_|           _ _              _   _            _   _
               |_‖_|            |_| |_|          |_| |_|

Bu nedenle, 2'ye 2 çikolata bar kırmanın 4 yolu vardır.

kurallar

• Giriş, işlev girişi, STDIN, komut satırı veya benzeri aracılığıyla iki tamsayı olacaktır. Çıktı tek bir sayı, çikolata kırmak için yolu sayısı.

• Sayılar oldukça hızlı bir şekilde arttığından, çıktı dilinizin tam sayı sınırlarını aşarsa endişelenmeyin - algoritmanız teorik olarak tüm olası girişler için çalıştığı sürece gönderiminiz geçerli olacaktır.

Test senaryoları

Çıktı sırasına bağlı değildir m,n, bu nedenle test senaryoları öyle listelenir m <= n.

1 1 -> 1
1 2 -> 1
1 3 -> 2
1 4 -> 6
1 5 -> 24
1 10 -> 362880

2 2 -> 4
2 3 -> 56
2 4 -> 1712
2 5 -> 92800
2 10 -> 11106033743298560

3 3 -> 9408
3 4 -> 4948992
3 5 -> 6085088256
3 10 -> 76209753666310470268511846400

4 4 -> 63352393728

A261964 , her satırın toplamına karşılık gelecek şekilde üçgen şeklinde düzenlenmiş çikolata sayılarıdır m+n.

Mathematica, 85 bayt

f=If[##==1,1,Tr[Sum[Binomial[1##-2,i#-1]f[i,#]f[#2-i,#],{i,#2-1}]&@@@{{##},{#2,#}}]]&

Test durumu

f[4,4]
(* 63352393728 *)

Python 3, 168 , 156 , 147 bayt

Sohbet sayesinde iyileştirmeler yapıldı

f=lambda n:n<1or n*f(n-1);a=lambda m,n,c=lambda m,n:sum(f(m*n-2)/f(i*n-1)/f((m-i)*n-1)*a(i,n)*a(m-i,n)for i in range(1,m)):+(m+n<4)or c(m,n)+c(n,m)

Ungolfed:

f=lambda n:n<1or n*f(n-1) # Factorial
def a(m, n):
    if m+n < 4:
        return 1
    first = 0
    for i in range(1,m):
        first += f(m*n-2) * 1/f(i*n-1) * 1/f((m-i)*n-1) * a(i,n) * a(m-i,n)
    second = 0
    for i in range(1,n):
        second += f(m*n-2) * 1/f(i*m-1) * 1/f((n-i)*m-1) * a(i,m) * a(n-i,m)
    return first + second

Algoritma dayanıyordu bu makaleye .

Muhtemelen çok daha fazla kesebilirdim, nerede olduğundan emin değilim

R, 208 198 bayt

f=function(m,n){g=function(i,j){a=0;if(j>1)for(x in 2:j-1)a=a+choose(j*i-2,x*i-1)*M[x,i]*M[j-x,i];a};s=max(m,n);M=matrix(1,s,s);for(i in 1:s)for(j in 1:s)if(i*j>2)M[i,j]=M[j,i]=g(i,j)+g(j,i);M[m,n]}

Girintili, yeni satırlarla:

f = function(m,n){
    g=function(i,j){
        a = 0
        if(j>1) for(x in 2:j-1) a = a + choose(j*i-2,x*i-1) * M[x,i] * M[j-x,i]
        a
    }
    s = max(m,n)
    M = matrix(1,s,s)
    for(i in 1:s) for(j in 1:s) if(i*j>2) M[i,j] = M[j,i] = g(i,j) + g(j,i)
    M[m,n]
}

Kullanımı:

> f(3,1)
[1] 2
> f(3,2)
[1] 56
> f(3,3)
[1] 9408
> f(4,3)
[1] 4948992
> f(5,3)
[1] 6085088256

Python 2, 135 bayt

C=lambda A:sum(C(A[:i]+A[i+1:]+[(c,H),(W-c,H)])for i,Q in enumerate(A)for W,H in(Q,Q[::-1])for c in range(1,W))or 1
print C([input()])

İşte ortaya koyduğum şey. Gerçekten yavaş, ama burada daha hızlı bir sürüm ( repoze.lru gerekir ):

from repoze.lru import lru_cache
C=lru_cache(maxsize=9999)(lambda A:sum(C(tuple(sorted(A[:i]+A[i+1:]+((c,H),(W-c,H)))))for i,Q in enumerate(A)for W,H in(Q,Q[::-1])for c in range(1,W))or 1)
print C((input(),))

Örnekler

$ time python2 chocolate.py <<< 2,5
92800

real    0m2.954s
user    0m0.000s
sys     0m0.015s

$ time python2 chocolate-fast.py <<< 3,5
6085088256

real    0m0.106s
user    0m0.000s
sys     0m0.015s

açıklama

Kod, Cbir dizi parçayı alan bir işlevi tanımlar . Algoritma şöyle:

1. for i,Q in enumerate(A): parça dizisi boyunca döngü.
2. for W,H in(Q,Q[::-1]): 90 derece dönen yolları iki kez hesaplayın.
3. for c in range(1,W): bölmek için olası konumlar arasında geçiş yapın.
4. A[:i]+A[i+1:]+[(c,H),(W-c,H)]: bölünmüş parça olmadan ve iki yeni parça ile bir liste alın.
5. C(…): bu listeden fonksiyonu tekrar çağırınız.
6. sum(…): olası her bölünme için sonuçları toplayın.
7. or 1: bölünme mümkün değilse, çikolatayı bölmenin tam bir yolu vardır.

Son olarak, kod girişi içeren bir dizi ile çağrılır.

ES6, 141 bayt

c=(m,n)=>(f=n=>n<2||n*f(n-1),h=(m,n)=>[...Array(m-1)].reduce((t,_,i)=>t+f(m*n-2)/f(++i*n-1)/f((m-i)*n-1)*c(i,n)*c(m-i,n),0),h(m,n)+h(n,m))||1

@CameronAavik tarafından bulunan formüle dayanarak. Ungolfed:

function fact(n) {
    return n < 2 ? 1 : n * f(n - 1);
}
function half(m, n) {
    total = 0;
    for (i = 1; i < m; i++)
        total += fact(m * n - 2) / fact(i * n - 1) / fact((m - i) * n - 1) * choc(i, n) * choc(m - i, n)
    return total;
}
function choc(m, n) {
    total = half(m, n) + half(n, m);
    if (!total) total = 1;
    return total;
}