登录
这个网站是通过捐款来支持的。OEIS基金会.

 

标志

请做一个捐款保持OEIS运行。我们现在已经第五十五岁了。在过去的一年里,我们增加了12000个新的序列,达到了8000个。引文(常说“感谢OEIS”)。我们需要筹集资金雇人管理提交,这将减少我们编辑的负担,加快编辑。
其他方式捐赠

提示
问候整数序列的在线百科全书!)
搜索 A069597—ID:A069597
显示3个结果的1-3。 第1页
     排序:相关关系推荐信γγ被改进的γ创建      格式:〈隆〉〉γ数据
A07000 80 整数三角形的最小边[a(n)<=]A07000(n)<A07000(n),按周界排序,词典编排。 + 10
八十九
1, 1, 2、1, 2, 2、1, 2, 3、2, 3, 1、2, 3, 3、2, 3, 4、1, 2, 3、3, 4, 2、3, 4, 4、1, 2, 3、3, 4, 4、5, 2, 3、5, 2, 3、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、γ 列表图表参考文献历史文本内部格式
抵消

1,3

链接

G. C. Greubeln,a(n)的前55行表

R. Zumkeller整数边三角形

公式

A(n)=A07000(n)A07000(n)A07000(n)。

Mathematica

[] [[[4] ] [/[4]和[[2 ] ] <每/ 2 [&[[3 ] ] < /2和];三角形[边[每],{,3,m } ],{ }} / /平坦[α],1 ]和/或SotBu[总计[α],MySuth+Y[] [[Mo],[^ ] [M]+[[y] ] [],三角形[[ALL,Y] ](*)Max=m=22;边[Pyr]:=选择[Re/@整数分割[P],{ 3 },范围[PULL[ PE/ 2 ]让弗兰,6月12日2012,更新JUL 09 2017 *)

交叉裁判

囊性纤维变性。A046128A055 595A069597.

囊性纤维变性。A07000A07000A07000A07000A0700 85A07000.

关键词

诺恩

作者

莱因哈德祖姆勒05五月2002

地位

经核准的

A07000 整数三角形的最大边A07000 80(n)<A07000(n)<a(n)],由周长排序,边词典排序。 + 10
七十三
1, 2, 2、3, 3, 3、4, 4, 3、4, 4, 5、5, 5, 4、5, 5, 4、6, 6, 6、5, 5, 6、6, 6, 5、7, 7, 7、6, 7, 6、5, 7, 7、5, 7, 7、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、y、γ 列表图表参考文献历史文本内部格式
抵消

1,2

评论

A07000 80(n)+A07000(n)+a(n)=A07000(n)。

链接

G. C. Greubel表n,a(n)为前55行,扁平化

R. Zumkeller整数边三角形

Mathematica

maxPer = 22; maxSide = Floor[(maxPer-1)/2]; order[{a_, b_, c_}] := (a+b+c)*maxPer^3 + a*maxPer^2 + b*maxPer + c; triangles = Reap[Do[If[ a+b+c <= maxPer && c-b < a < c+b && b-a < c < b+a && c-a < b < c+a, Sow[{a, b, c}]], {a, 1, maxSide}, {b, a, maxSide}, {c, b, maxSide}]][[2, 1]]; Sort[triangles, order[#1] < order[#2] &] [[All, 3]](*让弗兰6月12日2012*)

[] [[[4] ] [/[4]和[[2 ] ] <每/ 2 [&[[3 ] ] < /2和];三角形[边[每],{,3,m } ],{ }} / /平坦[α],1 ]和/或SotBu[总计[α],MySuth+Y[] [[Mo],[^ ] [M]+[[y] ] [],三角形[[ALL,Y] ](*)Max=m=22;边[Pyr]:=选择[Re/@整数分割[P],{ 3 },范围[PULL[ PE/ 2 ]让弗兰,JUL 09 2017*)

交叉裁判

囊性纤维变性。A046130A07000A0700 85A07000A055 592A069598A069597.

关键词

诺恩

作者

莱因哈德祖姆勒05五月2002

地位

经核准的

A070142 数字N使A07000 80(n)A07000(n)A07000(n)是具有整数面积的整数三角形。 + 10
十一
17, 39, 52、116, 212, 252、269, 368, 370、372, 375, 493、561, 587, 659、839, 850, 862、957, 972, 1156、1186, 1196, 1204、1297, 1582, 1599、1629, 1912, 1920、1955, 1971, 1988、2115, 2352, 2555、2115, 2352, 2555、γ 列表图表参考文献历史文本内部格式
抵消

1,1

链接

n,a(n)n=1…41的表。

Eric Weisstein的数学世界,海伦三角形.

R. Zumkeller整数边三角形

例子

A(2)=39:A07000 80(39)A07000(39)A07000(39)]=[5,5,6],面积^ 2=S*(S 5)*(S 5)*(S -6),S=A07000(39)/ 2=(5+5+6)/2=8,面积2=8*3*3*2=2 *是整数平方。A07000(39)=面积=4×3=12。

Mathematica

maxPerim = 100; maxSide = Floor[(maxPerim - 1)/2]; order[{a_, b_, c_}] := (a + b + c)*maxPerim^3 + a*maxPerim^2 + b*maxPerim + c; triangles = Reap[ Do[ If[ a + b + c <= maxPerim && c - b < a < c + b && b - a < c < b + a && c - a < b < c + a, Sow[{a, b, c}]], {a, 1, maxSide}, {b, a, maxSide}, {c, b, maxSide}]][[2, 1]]; stri = Sort[ triangles, order[#1] < order[#2]&]; area[{a_, b_, c_}] := With[{p = (a + b + c)/2}, Sqrt[p*(p - a)*(p - b)*(p - c)]]; Position[ stri, tri_ /; IntegerQ[area[tri]]] // Flatten (*让弗兰2月22日2013*)

交叉裁判

囊性纤维变性。A07000 88A070149A070143A070144A070145A051516A069594AA069597A070136A070137A070209.

关键词

诺恩

作者

莱因哈德祖姆勒05五月2002

地位

经核准的

第1页

搜索在0.008秒内完成

查找γ欢迎γ维基γ注册γ音乐γ情节2γ演示γ指数γ浏览γ更多γ网络摄像机
贡献新的SEQ。或评论γ格式γ样式表γ变换γ超级导引头γ最近
OEIS社区通过保持OEIS基金会

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

最后修改了12月12日09:06 EST 2019。包含329948个序列。(在OEIS4上运行)