(带下划线的文本是附加;删除线文本是删除)
显示所有更改。
|
|
|
|
#7通过乔格·阿恩特2014年3月23日星期日03:19:06 EDT |
|
|
|
#6通过乔恩·肖恩菲尔德美国东部时间2014年3月23日星期日02:14:07 |
|
|
|
#5通过乔恩·肖恩菲尔德2014年3月23日星期日美国东部夏令时02:14:04 |
| 数学
|
选择[范围[200000],okQ]] (* _哈维 P(P).山谷_,12月 10 2010*)
|
| 扩展
|
附加条款 假如 和 数学软件 程序 假如 通过 从_哈维·P·戴尔,_,12月. 10, 2010
|
| 状态
|
经核准的
编辑
|
|
|
|
#4通过N.J.A.斯隆美国东部时间2010年12月11日星期六00:26:54 |
|
|
|
#3通过哈维·P·戴尔2010年12月10日星期五17:31:54 EST |
| 数据
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 16, 24, 32, 40, 48, 56, 64, 72, 80, 88, 96, 108, 216, 324, 432, 540, 648, 756, 864, 972, 1216, 2432, 3648, 4864, 8000, 9216, 10000, 18000, 20000, 28000, 30000, 38000, 40000, 48000, 50000, 58000, 60000, 68000, 70000, 78000, 80000,88000,90000,98000,108000
|
| 数学
|
okQ[n_]:=模[{idn=IntegerDigits[n]},和@@(可除[#[2]],#[[1]]^3]&/@表[{i,起始数字[Take[idn,-i]]}、{i,长度[idn]}])]
选择[范围[200000],okQ]
|
| 扩展
|
Harvey P.Dale提供的附加条款和Mathematica程序,2010年12月10日
|
| 状态
|
经核准的
提议的
|
|
|
讨论
|
12月10日星期五
| 17:33
| 哈维·P·戴尔:不清楚是否需要额外的术语,因为已经存在三行以上的术语,但序列被标记为需要额外术语,所以我又添加了4行。哈维·P·戴尔,12-10-10
|
| 17:36
| 阿隆索·德尔·阿特:标签在哪里?我没有看到关键词:more。
|
| 17:44
| 哈维·P·戴尔:在网络摄像头中,最左边的下拉菜单列出了几个选项,包括“最近的”和“需要更多术语的序列”。我选择了后者,循环浏览了几个序列,然后出现了这个。
|
|
|
|
#2通过N.J.A.斯隆2003年9月13日星期六美国东部夏令时03:00:00 |
| 名称
|
数字n,其中n的最后K位构成一个整数,可被K^3整除,对于K=1,2。。。,M、 其中M是n中的位数..
|
| 例子
|
a(33)=4864,因为4可以被1^3整除,64可以被2^3整除了,864可以被3^3整掉,4864可以被4^3整去..
|
| 关键词
|
基础,非n,新的
|
|
|
|
#1通过N.J.A.斯隆2003年5月16日星期五美国东部夏令时03:00:00 |
| 名称
|
数字n,其中n的最后K位构成一个整数,可被K^3整除,对于K=1,2。。。,M、 其中M是n中的位数。
|
| 数据
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 16, 24, 32, 40, 48, 56, 64, 72, 80, 88, 96, 108, 216, 324, 432, 540, 648, 756, 864, 972, 1216, 2432, 3648, 4864, 8000, 9216, 10000, 18000, 20000, 28000, 30000, 38000, 40000, 48000, 50000, 58000, 60000, 68000, 70000, 78000, 80000
|
| 抵消
|
1,2
|
| 例子
|
a(33)=4864,因为4可以被1^3整除,64可以被2^3整除了,864可以被3^3整掉,4864可以被4^3整去。
|
| 关键词
|
基础,非n
|
| 作者
|
Sudipta Das(juitech(AT)vsnl.net),2003年2月3日
|
| 状态
|
经核准的
|
|
|
|
|