编辑

经核准的

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

经核准的

编辑

编辑

经核准的

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

分配给Vaclav Kotesovec

乘积{k>=1}的展开（1+x^（7*k-5））。

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

0,26

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

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

nmax=100；poly=常量数组[0，nmax+1]；聚[1]]=1；poly〔〔2〕〕＝0；Do[如果[Mod[k，7]==2，Do[poly[[j+1]]+=poly[[j-k+1]]，{j，nmax，k，-1}]；]，{k，2，nmax}]；聚

囊性纤维变性。A109704号,A281245型,A281455型,A281456号,A281457型,A280457型.

分配

非n

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

经核准的

编辑

分配给Vaclav Kotesovec

分配

经核准的