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

 

标志


提示
(问候来自整数序列在线百科全书!)
A072330型 公差n,即存在n-算术的本原三角形(即算术级数的边具有公共差n的原始Heronian三角形)。 8
1、11、13、23、37、47、59、61、71、73、83、97、107、109、121、131、143、157、167、169、179、181、191、193、227、229、239、241、251、253、263、277、299、311、313、337、347、349、359、373、383、397、407、409、419、421、431、433、443、457、467、479、481、491、503 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

第一个条目尤其与序列相关联A003500型A007655号.

这样的三角形有一个中间边2*x,按相应的高度划分为x+-2*n(即,中间点和高度点之间的距离始终为2*n)。

链接

弗兰克•M•杰克逊,n=1..10000的n,a(n)表

R、 A.Beauregard和E.R.Suryanarayan,算术三角形,数学杂志,第105-115页70(2)1997年MAA。

公式

素数与1+1的乘积。

枫木

isA072330:=过程(n)

如果n=1,则

是的;

其他

对于因子(n)[2]中的p

如果不是{1,11}中的modp(op(1,p),12),那么

返回false;

结束if;

结束do:

是的;

结束if;

结束过程:

对于n从1到1000 do

如果是isA072330(n),则

printf(“%d,”,n);

结束if;

结束do:#R、 J.马萨2017年2月26日

数学

fac12Q[n\]:=和@@(MemberQ[{1,11},#]&/@Mod[First/@FactorInteger@n,12]);匡拒[Range[600],fac12Q](*弗兰克M杰克逊2016年4月9日,简化为乔瓦尼·雷斯塔*)

okQ[n_u]:=AllTrue[factoranteger[n][[All,1]],MatchQ[Mod[#,12],1 | 11]&];

选择[范围[1000],确定](*让·弗朗索瓦·阿尔科弗2020年3月6日*)

交叉引用

囊性纤维变性。A072360型,A086909号,A089019号,A089020型,A096672号,A096673号,A096674号.

上下文顺序:A048393号 邮编:A136058 A106073号*A097933号 邮编:A166484 邮编:A127043

相邻序列:A072327型 A072328号 A072329号*A072331号 A072332号 A072333号

关键字

作者

莱克莱·比达西2002年7月15日

扩展

修正和扩展雷·钱德勒2004年7月2日

b文件错误胭脂红替换为弗兰克M杰克逊2016年5月9日

状态

经核准的

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

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

上次修改时间:2021年9月28日18:42。包含347717个序列。(运行在oeis4上。)