|
|
A068776号 |
| a(0)=1;对于n>0,a(n)是a(n-1)的(真)倍数的最小三角形数。 |
|
5
|
|
|
1, 3, 6, 36, 2016, 1493856, 579616128, 11013286048128, 1004811205553955491328, 1897191992473259952000123882626029056, 5012064437680248664058937311304485563631765718940918773832320000
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
0,2
|
|
链接
|
|
|
例子
|
a(2)=6,因为6=2*a(1)和6是一个三角形数。
|
|
数学
|
pm1[{k}]:={1,k-1};pm1[lst_]:=模块[{a,m,v},a=lst[[1];m=休息时间[lst];v=pm1[Rest[lst]];联合〔ChineseRemainder〔{1,#},{a,m}〕和/@v,ChineseRemainder〔{-1,#},{a,m}〕和/@v〕;nexttri[1]=3;nexttri[n_]:=模块[{s},s=(pm1[Power@@#&&@FactorInteger[4n]]^2-1)/8;对于[i=1,True,i++,如果[s[i]]>n,返回[s[[i][]]]];a[0]=1;a[n]:=a[n]=nexttri[a[n-1]];(*首先执行<<数字理论`NumberTheoryFunctions`。如果lst是一个相对素整数列表>=3,则pm1[lst]是小于其乘积且==1或-1(mod lst的每个元素)的数字列表。nexttri[n]是最小的三角形数>n,可以被n整除
|
|
黄体脂酮素
|
(PARI){a068776(m)=局部(k,q,n);k=1;q=k*(k+1)/2;while(q<m,n=q;print1(n,“,”
(Python)
从itertools导入islice
从sympy导入sqrt_mod_iter
a=8
为True时:
产量a>>3
b=a+1
对于sqrt_mod_iter(1,a)中的d:
如果d==1或d**2-1==a:
d+=a
如果d&1和d<b:
b=d
a=b**2-1
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|