2,1
注意,素数不一定增加。
n=2..27的n,a(n)表。
nMax=100;lst={1};numer={1};s=1;Do[k=1;而[GCD[k,n]>1 |!PrimeQ[Numerator[s+k/n]],k++];s=s+k/n;AppendTo[lst,k];AppendTo[numer,Numerator[s]];k++,{n,2,nMax}];分子
囊性纤维变性。A076476号.
上下文顺序:A095692号 邮编:A163421 邮编:A173381*A319335型 A104079号 A332264
相邻序列:A076474号 A0475年 A076476号*A076478号 A076479号 A076480号
不
T、 D.不2002年10月14日
经核准的