登录
OEIS由
OEIS基金会的许多慷慨捐赠者
.
提示
(来自的问候
整数序列在线百科全书
!)
A189979号
n X n网格(或地理板)上的直角三角形数,相异到同余。
5
0, 1, 4, 9, 17, 26, 39, 53, 71, 91, 114, 136, 169, 197, 231, 267, 310, 346, 397, 437, 492, 548, 606, 654, 729, 791, 858, 928, 1007, 1071, 1173, 1241, 1333, 1423, 1509, 1600, 1728, 1814, 1912, 2015, 2144
(
列表
;
图表
;
参考
;
听
;
历史
;
文本
;
内部格式
)
抵消
1,3
链接
n=1..41时的n,a(n)表。
例子
对于n=3,四个直角三角形为:
**. *.* *.* .*.
*.. *.. ... *..
... ... *.. .*.
MAPLE公司
三角形:=proc(n)局部三角形集,i,j,k,l,A,B,C;
三角形集:={}:对于i从0到n,对于j从0到n,对于k从0到ndo,对于l从0到n-do A:=i^2+j^2:B:=k^2+l^2:C:=(i-k)^2+(j-l)^2:如果A^2+B^2+C^2<>2*(A*B+B*C+C*A),则三角形集:od:od:od:返回(TriangleSet);
结束:
IsRectangularTriangle:=proc(T)如果T[1]^2+T[2]^2=T[3]^2或T[1]|2+T[3]^2=T[2]^2或T[2]^2+T[3]^2=T[1]^2,则为true,否则为false fi:结束:
a: =proc(n)局部三角形集,矩形三角形集,i;
三角形集:=三角形(n):矩形三角形集:={}:对于i从1到nops(三角形集),如果IsRectangularTriangle(TriangleSet[i]),那么RectanguarTriangleSet:={op(RectanglarTriangaleSet),TriangleSet[i]}fi:od:return(nops(RectangularTringleSet));
结束:
交叉参考
囊性纤维变性。
A028419号
,
A077435号
.
上下文中的序列:
A161320型
A170879号
A134578号
*
A272718型
A301255型
A009851号
相邻序列:
A189976号
A189977号
A189978号
*
189980英镑
A189981号
A189982号
关键词
非n
,
更多
作者
马丁·瑞诺
2011年5月3日
扩展
a(21)到a(40)来自
马丁·瑞诺
2011年5月8日
状态
经核准的