登录
OEIS由
OEIS基金会的许多慷慨捐赠者
.
提示
(来自的问候
整数序列在线百科全书
!)
A153750型
数字k,使得k^2中有14个数字,对于14(1,2,7)的每一个因子f,大小为f的数字分组之和是一个平方。
2
3196200, 3330249, 3330348, 3330480, 3330801, 3331071, 3331367, 3331695, 3331731, 3331758, 3331803, 3331830, 3331860, 3331866, 3331929, 3331995, 3332025, 3332058, 3332061, 3332091, 3332124, 3332127, 3332160, 3332190
(
列表
;
图表
;
参考
;
听
;
历史
;
文本
;
内部格式
)
抵消
1,1
评论
此序列是这两个序列的子序列
A153745号
和
A061910号
.
最后一项是a(266)=9996830-
乔瓦尼·雷斯塔
2015年6月6日
链接
乔瓦尼·雷斯塔,
n=1..266时的n,a(n)表
(全序列)
例子
3331367^2 = 11098006088689;
1+1+0+9+8+0+0+6+0+8+8+6+8+9 = 64 = 8^2;
11+09+80+06+08+86+89 = 289 = 17^2;
1109800+6088689 = 7198489 = 2683^2.
数学
sdgQ[n_]:=模块[{idn=整数位数[n^2],t2,t7},t2=总计[FromDigits/@Partition[idn,2]];
t7=总计[FromDigits/@Partition[idn,7]];
AllTrue[{Sqrt[总计[idn]],Sqrt[t2],Sqrt[t7]},整数Q]];
选择[Range[Round[3.16*10^6],Round[3.34*10^6]],sdgQ](*程序使用Mathematica版本10*中的AllTrue函数)(*
哈维·P·戴尔
,2016年8月7日*)
交叉参考
囊性纤维变性。
A061910号
,
A153745号
.
上下文中的序列:
A032783号
A034638号
A122034号
*
A234689型
A232619型
A223287型
相邻序列:
A153747号
A153748号
A153749号
*
A153751号
A153752号
A153753号
关键词
非n
,
基础
,
完成
,
满的
作者
道格·贝尔
2008年12月31日
状态
经核准的
查找
|
欢迎光临
|
维基
|
注册
|
音乐
|
地块2
|
演示
|
索引
|
浏览
|
网络摄像头
贡献新序列。
或评论
|
格式
|
样式表
|
变换
|
超级搜索
|
最近
OEIS社区
|
维护人
OEIS基金会。
许可协议、使用条款、隐私政策。
.
上次修改时间:2024年9月23日18:10 EDT。
包含376182个序列。
(在oeis4上运行。)