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

 


A306678型
具有素数边和最大边的不同三角形数=素数(n)。
4
1, 3, 4, 6, 7, 11, 13, 18, 21, 22, 29, 30, 37, 46, 53, 56, 60, 71, 75, 87, 101, 105, 118, 124, 123, 139, 157, 173, 193, 209, 186, 207, 219, 244, 241, 264, 277, 291, 318, 329, 344, 371, 373, 405, 433, 465, 447, 440, 474, 511, 545, 563, 597, 602, 623, 645
抵消
1,2
配方奶粉
a(n)=A306676型(n)+A306677型(n) ●●●●。
例子
对于n=1,有一个三角形:{2,2,2},最大边素(1)=2。
对于n=2,有3个三角形:{2,2,3},{2,3,3},{3,3,},最大边素(2)=3。
当n=4时,有6个三角形:{2,7,7},{3,5,7},{3、7、7}、{5、5、7}、{5,7,6},最大边素(4)=7。总计=6=a(4)。
对于n=5,最大边=素数(n)=11。三角形是{{2,11,11},{3,11,10},},5,7,11},[5,11,11}],{7,7,11',{7,11,11}。总计=7=a(5)。
MAPLE公司
#nType=1表示锐角三角形,nType=2表示钝角三角形
#两个三角形的nType=0
CountPrimeTangles:=proc(n,类型:=1)
局部aa、oo、j、k、sg、a、b、c、tt、lAcute;
aa:={};oo:={};
a:=ithprime(n);
对于j,从n乘-1到1 do
b:=ithprime(j);
对于k从j到-1 do
c:=ithprime(k);
如果a<b+c和abs(b-c)<a和b<c+a和abs
l急性:=evalb(0<b^2+c^2-a^2);
tt:=排序([a,b,c]);
如果lAcute,则aa:={op(aa),tt}else oo:={op(oo),tt}end if
结束条件为
结束do
结束do;
返回排序(`if`(nType=1,aa,`if`)
结束进程:
关键词
非n
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月22日08:33。包含376097个序列。(在oeis4上运行。)