登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A333529型 n<=k<=m且满足T峎n+T峎k=tu m的三元组数[n,k,m],其中T_i=i*(i+1)/2是三角形数。 4
1、1、1、1、1、1、2、2、1、2、2、2、2、3、2、3、3、2、5、3、2、5、5、2、3、1、4、4、4、4、5、2、3、4、4、5、5、5、5、5、5、5、5、5、5、5、6、6、6、6、3、8、4、6、6、8、6、6、6、6、6、6、6、6、6、6、6、6、5、6、6、5、6、7、7、7、2、9、9、9、9、9、9、9、9、9、9、9、9、9、11、6、6、6、6、6、6、6、6、6、6 6,11,6,3,7,7,2,7,12,6,5,7,3,10,16,6,6,5,6,6,3,4,12,12,5,6,6,3,12 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,5个

评论

如果n为nA068194号. -罗伯特·以色列2020年4月3日

链接

罗伯特·以色列,n=1..10000的n,a(n)表

例子

有一个n<=16英寸的所有三元组(包括0<k<n的那些)A309507飞机.

枫木

带(数字):

A: =[];M:=150;ct:=阵列(0..M,0):

对于n从1到M do

TT:=n*(n+1);

dlis:=除数(TT);

在dlis do中为d

如果(d mod 2)=1,则e:=TT/d;

mi:=最小值(d,e);ma:=最大值(d,e);

k: =(ma-mi-1)/2;m:=(ma+mi-1)/2;

#k<n时跳过

如果k>=n,则

ct[n]:=ct[n]+1;

L打印(n,k,m);

金融机构;

金融机构;

外径:

外径:

[顺序(ct[n],n=1..M)];

#备选方案:

f: =过程(n)局部t,t0,r,dmax,divs;

t:=n*(n+1);

r:=padic:-ordp(t,2);

t0:=t/2^r;

dmax:=楼层((sqrt(8*t+1)-1)/2-n;

除数:=numtheory:-除数(t0);

nops(选择(`<=`,divs,dmax))+nops(选择(`<=`,divs,dmax/2^r))

结束过程:

地图(f,[$1..200])#罗伯特·以色列2020年4月3日

数学

T【n】:=n(n+1)/2;

r[n_u]:=Reduce[n<=k<=m&&T[n]+T[k]==T[m],{k,m},整数];

一个[n_]:=模块[{rn=r[n],r0},r0=rn[[0]];其中[r0==Or,Length[rn],r0==And,1,rn===False,0,True,Print[“错误”,n,”,rn]]];

阵列[a,100](*让·弗朗索瓦·阿尔科弗2020年6月8日*)

交叉引用

A309507飞机对k>0的所有三元组进行计数。

囊性纤维变性。A000217,A068194号.

上下文顺序:A219644年 A193676号 A029291号*A022872号 A091423号 A221914年

相邻序列:A333526飞机 A333527飞机 A333528飞机*A333530 A333531型 A333532型

关键字

,

作者

N、 斯隆2020年3月31日

状态

经核准的

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

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

上一次修改时间:美国东部时间2021年4月12日08:33。包含342912个序列。(运行在oeis4上。)