> ããããã®ã³ã¡ã³ãã§ããïŒä»€åïŒå¹ŽïŒæïŒæ¥ä»ãïŒ
>ãã«ã¿ã©ã³æ°C(n)ã«é¢ããŠãäžè¬ã«ã¯ãnÃn ã®æ Œåè·¯ã«å¯ŸããŠã(0,0)ãã(n,n)ãŸã§ã(0,0)(n,n)
>ãçµã¶å¯Ÿè§ç·ããäžæ¹ãžã¯ã¯ã¿åºããªãéšåã§è¡ããçµè·¯ã®æ°ãäžãããã®ãšç޹ä»ãããäŸ
>ãããèŠãã
>ãããã§ãæ£æ¹åœ¢ã®æ Œåè·¯ãæ¹ããnÃmã§ã®é·æ¹åœ¢ã®æ Œåè·¯ãèããx 軞æ¹åãžã¯ãïœãy
>軞æ¹åãžã¯ãïœãšãã(0,0)ã(n,m)ãçµã¶å¯Ÿè§ç·ãåŒãããã®çŽç·ããäžæ¹ãžã¯ç«ã¡å
¥ããã«
>(0,0)ããæ Œåç¹ãééããªãã(n,m)å°ç¹ã«èŸ¿ãçããã«ã¿ã©ã³è·¯ãäœéãããããèããã
>ãšã«ããã
>ããã®æ±ãããç·æ°ããC(n,m) ãšèšããŠãåŒãæ§æããããšé 匵ã£ãŠã¿ãã®ã ããæå€ãšïœã«
>ãã£ãŠæ§é ãç°ãªã£ãŠããŸãã®ã§ããŸã ãäžã€ã®åŒã§è¡šããã®ã«èŸ¿ãçããŠããŸããã
以äžã®ããŒãžã«ãC(n,m) ã®å€ãèšç®ããåŒã®å°åºæ³ã詳ããæžãããŠããŸãïŒ
https://www.jstor.org/stable/41139633?seq=1
ã Grossman's formulaããšåŒã°ããŠããããã§ãã
èŠçŽãããšãC(n,m)ã¯æ¬¡åŒã§èšç®ã§ãããšã®ããšã§ãã
n,mã®æå€§å
¬çŽæ°ãdïŒn=d*n', m=d*m' ãšãããšã
C(n,m)
=C(d*n',d*m')
=[x^d]exp(â[j=1ïœd]binomial(j*(n'+m'),j*n')*(x^j)/(j*(n'+m'))).
äžèšããŒãžã®è«æã®çµæã䜿ãïŒC(6,m)ãèšç®ããŸããã
C(6,m)=C(m)ãšãããŠïŒm=0ïœ100ã«å¯ŸããC(m)ã®å€ã maxima ã§èšç®ãããã®ã以äžã§ãã
(%i2) C(m):=if mod(m,6)=0 then binomial(m+6,6)/(m+1) else
if mod(m,6)=1 or mod(m,6)=5 then binomial(m+6,6)/(m+6) else
if mod(m,6)=2 then ((m+2)*(m+4)*(8*m^3+77*m^2+214*m+160))/5760 else
if mod(m,6)=3 then ((m+3)*(27*m^4+364*m^3+1698*m^2+3186*m+2025))/19440 else
((m+2)*(m+4)*(8*m^3+77*m^2+214*m+160))/5760$
makelist(C(m),m,0,100);
(%o2) [1,1,4,12,23,42,132,132,227,377,525,728,1428,1428,2010,2803,3504,4389,7084,7084,9097,11654,13793,16380,
23751,23751,28931,35246,40356,46376,62832,62832,73950,87143,97584,109668,141778,141778,162883,187453,
206591,228459,285384,285384,322046,364124,396510,433160,527085,527085,586638,654240,705789,763686,
910252,910252,1002037,1105317,1183487,1270752,1489488,1489488,1625096,1776599,1890570,2017169,
2331924,2331924,2525439,2740354,2901207,3079140,3518515,3518515,3786757,4083170,4304066,4547556,
5145336,5145336,5508104,5907251,6203610,6529292,7324878,7324878,7805193,8331713,8721393,9148503,
10187344,10187344,10811692,11493880,11997356,12547920,13881945,13881945,14680520,15550580,16191123]
玹ä»ããŠé ãã貎éãªè«æãæèŠãããŠé ããŸããã
ç®ãåãæ§ãªè«çã®å±éã§äžã€ã®åŒã§è¡šçŸããããã«ã¯
倧å€ãªèå¯ãå¿
èŠãªããšã宿ã§ããŸããã
äžè¬ã«O(0,0),P(n,m)ã®2ç¹ãçµã¶çŽç·ã®äžæ¹(çŽç·äžãå«ã)ã®é å
ã ããééããæ Œåè·¯ã§OããPãŸã§ã®æçè·¯ã®ç·æ°G(n,m)ãæ±ãã
ããã°ã©ã ãããããããã®ã¢ã€ãã¢ããåãããŠä»¥åäœæããŠãã
ã®ãæãåºããŸããã
以äžããã®ããã°ã©ã (PARI/GPã§ã®ã³ãŒã)ãšçµæã«ãªããŸãã
ãªã\èšå·ã¯è€æ°è¡ã«æž¡ãèšè¿°ã®ããã®ç¹ãã®ããã®ãã®ã§ãã
gp > G(n,m)={M=matrix(n+1,m+1,i,j,if(j==1,1,i==1 && j>1,0))};\
for(x=2,n+1,for(y=2,m+1,if(m*(x-1)<n*(y-1),next,\
M[x,y]=M[x-1,y]+M[x,y-1])));M[n+1,m+1]
gp > for(n=2,9,print1(n"=>");for(m=1,30,print1(G(n,m)","));print)
2=>1,2,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,10,10,11,11,12,12,13,13,14,14,15,15,16,
3=>1,2,5,5,7,12,12,15,22,22,26,35,35,40,51,51,57,70,70,77,92,92,100,117,117,
126,145,145,155,176,
4=>1,3,5,14,14,23,30,55,55,76,91,140,140,178,204,285,285,345,385,506,506,593,
650,819,819,938,1015,1240,1240,1396,
5=>1,3,7,14,42,42,66,99,143,273,273,364,476,612,969,969,1197,1463,1771,2530,
2530,2990,3510,4095,5481,5481,6293,7192,8184,10472,
6=>1,4,12,23,42,132,132,227,377,525,728,1428,1428,2010,2803,3504,4389,7084,
7084,9097,11654,13793,16380,23751,23751,28931,35246,40356,46376,62832,
7=>1,4,12,30,66,132,429,429,715,1144,1768,2652,3876,7752,7752,10659,14421,
19228,25300,32890,53820,53820,67860,84825,105183,129456,158224,231880,231880,
278256,
8=>1,5,15,55,99,227,429,1430,1430,2529,3978,7229,9690,14985,21318,43263,43263,
61600,82225,121637,148005,199238,254475,420732,420732,543806,672452,900239,
1043460,1307742,
9=>1,5,22,55,143,377,715,1430,4862,4862,8398,15090,22610,35530,58040,81719,
120175,246675,246675,345345,500449,650325,876525,1220135,1542684,2017356,
3362260,3362260,4289780,5630306,
6=>ã®å Žåãatæ°ã®åºåãšäžèŽãããšæããŸãã