登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A292310型 与其他两个三角形数等距的三角形数。 4
3, 21, 28, 36, 78, 105, 153, 171, 190, 210, 253, 325, 351, 378, 465, 528, 666, 703, 903, 946, 990, 1035, 1128, 1176, 1275, 1378, 1485, 1540, 1596, 1653, 1711, 1770, 1891, 1953, 2278, 2346, 2556, 2628, 2775, 2926, 3003, 3081, 3160, 3403, 3570, 3741, 3828, 4095, 4186, 4278, 4371, 4656 (列表图表参考历史文本内部格式)
抵消
1,1
评论
三角数是另外两个三角数的算术平均值-R.J.马塔尔2017年10月1日
链接
配方奶粉
a(n)=A292309型(n) /3。
例子
3在序列中,因为0=A000217号(0), 6 =A000217号(3) ,从3到0和从3到6的距离相同。
153在序列中,因为153=A000217号(17), 6 =A000217号(2), 300 =A000217号(24),两个距离300-153=153-6=147相同。
MAPLE公司
isA292310:=进程(n)
本地ilow;
如果是A000217(n),则
对于ilow从0 do
耕犁:=A000217号(ilow);
如果tillow>=n,则
返回false;
elif为A000217(2*n-tilow),则
返回true;
结束条件:;
结束do:
其他的
假;
结束条件:;
结束进程:
n从1到5000 do
如果是A292310(n),则
printf(“%d,”,n);
结束条件:;
结束do:#R.J.马塔尔2017年10月1日
数学
模块[{t=3,k=2,i,e,v},收割[当[t<=6000,i=k;e=0;v=t+i;当[i>0&&e==0,如果[整数Q@Sqrt[8v+1],e=1;母猪[t]];i——;v+=i];k++;t+=k]][[2,1]]](*Jean-François Alcover公司2023年6月25日,在第一个PARI代码之后*)
黄体脂酮素
(PARI)t=3;k=2;当(t<=6000,i=k;e=0;v=t+i;当(i>0&e==0,如果(i平方(8*v+1),e=1;打印1(t,“,”);i——;v+=i);k++;t+=k)
(PARI)小于等于(n)={my(t=0,i=0,triangulars=List([0]),res=List);while(t<=n,i++;t+=i;listput(triangulars,t));for(i=2,#triangular,tr=triangular[i]<<1;for(j=1,i-1,if(issquare(8*(tr-triangulars[j])+1),listput(res,trianguars[i]);next(2))));res}\\大卫·A·科内斯2017年10月4日
交叉参考
关键词
非n
作者
安东尼奥·罗尔丹2017年9月14日
扩展
条款105由添加大卫·A·科内斯2017年10月4日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月19日16:52 EDT。包含371794个序列。(在oeis4上运行。)