登录

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

 

提示 （来自的问候整数序列在线百科全书!) A327792型 a（n）是划分为三角形数的最大非负数(A000217号)，一个平方数(A000290型)和一个五边形数(A000326号)以n种不同的方式。 2 0, 18, 168, 78, 243, 130, 553, 455, 515, 658, 865, 945, 633, 1918, 2258, 1385, 1583, 2828, 2135, 2335, 2785, 4533, 3168, 3478, 2790, 3868, 4193, 7328, 4953, 5278, 6390, 8148, 8015, 4585, 9160, 10485, 7613, 12333, 12025, 10178, 9923, 9720, 12558, 11340, 17420, 11753, 14893, 16155, 16415, 14343, 18053, 19803, 16608, 27283 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,2 评论 最大非负数k，如下所示A240088型（k） =个。 链接 Robert G.Wilson v，n=1..200时的n，a（n）表 例子 a（0）不存在，因为所有数字都可以表示为三角形、正方形和五边形数字的和。 数学 f[n_]：=块[{j，k=1，lenq，lenr，v={}，t=PolygonalNumber[3，范围[0，1+Sqrt[2n]]]，s=多边形编号[4，范围[0,1+Sqrt[n]]，p=多边形编号[0，2+Sqrt[2n/3]]}，u=选择[Union[Join[t，s，p]]，#<n+1&]；q=整数分区[n，{3}，u]；透镜=1+长度@q; 而[k<lenq，j=1；r=q[[k]]；rr=置换@r; lenr=1+长度@rr; 而[j<lenr，If[MemberQ[t，rr[[j，1]]&&MemberQ[s，rr[[j，2]]]&MemberQ[p，rr[]，3]]]，AppendTo[v，rr[j]]]；j++]；k++]；长度@v]; 交叉参考 囊性纤维变性。A000217号，A000290型，A000326号，A240088型，A275999型，A327793型. 上下文中的序列：A041618号 A055915号 A208827型*A071539号 A125381号 A126539号 相邻序列：A327789型 A327790型 A327791型*A327793型 327794英镑 A327795型 关键词 非n 作者 罗伯特·威尔逊v2019年9月25日 状态 经核准的

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

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

上次修改时间：美国东部夏令时2024年4月25日21:09。包含371989个序列。（在oeis4上运行。）