编辑

经核准的

a（n）~exp（平方（n/21）*Pi）/（2^（10/7）*21^（1/4）*n^（3/4）)).)) * (1- (三*平方英尺(21)/(8*圆周率) +23*圆周率/(336*平方英尺(21))) /平方英尺(n个)). - _瓦茨拉夫 科特索维奇_,1月 22 2017,扩展 1月 24 2017

经核准的

编辑

编辑

经核准的

瓦茨拉夫·科特索维奇（Vaclav Kotesovec），<a href=“/A281457型/b281457.txt“>n表，n=0..10000时为a（n）</a>

分配给Vaclav Kotesovec

乘积展开（1+x^（7*k-4））。

1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 0, 2, 0, 0, 1, 1, 0, 0, 2, 0, 0, 1, 1, 0, 0, 3, 0, 0, 2, 1, 0, 0, 3, 0, 0, 3, 1, 0, 1, 4, 0, 0, 4, 1, 0, 1, 4, 0, 0, 5, 1, 0, 2, 5, 0, 0, 7, 1, 0, 3, 5, 0, 0, 8, 1, 0, 5, 6, 0, 1

0,28

a（n）~exp（平方（n/21）*Pi）/（2^（10/7）*21^（1/4）*n^（3/4））。

nmax=100；系数列表[系列[乘积[（1+x^（7*k-4））），{k，1，nmax}]，{x，0，nmax{]，x]

nmax=100；poly=常量数组[0，nmax+1]；聚[1]]=1；poly[2]]=0；Do[如果[Mod[k，7]==3，Do[poly[[j+1]]+=poly[[j-k+1]]，{j，nmax，k，-1}]；]，{k，2，nmax}]；多边形

囊性纤维变性。A109705号,281245元,A281455型,A281456号,A281458型,A280457型.

分配

非n

瓦茨拉夫·科特索维奇，2017年1月22日

经核准的

编辑

分配给Vaclav Kotesovec

分配

经核准的