|
|
|
|
|
|
|
|
|
#19通过乔恩·肖恩菲尔德2017年4月1日星期六00:34:16 EDT |
|
|
|
|
|
|
|
#18通过乔恩·肖恩菲尔德美国东部时间2017年4月1日星期六00:34:14 |
|
| 作者
|
_N。J.A.斯隆_._
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#17通过N.J.A.斯隆2017年2月18日星期六21:58:27 EST |
|
|
|
|
|
|
|
#16通过迈克尔·德弗利格2017年2月13日星期一22:47:54 EST |
|
|
|
|
|
讨论
|
| 2月18日星期六
| 01:12
| 米歇尔·马库斯：1100（1100）怎么样？
|
|
| 02:08
| 米歇尔·马库斯：到11999年呢？
|
|
| 21:58
| N.J.A.斯隆：“1100”不是标准的，所以如果缺少就可以了
|
|
|
|
|
|
|
#15通过迈克尔·德弗利格2017年2月13日星期一22:47:44 EST |
|
| 数学
|
选择[Range[10^3]，Function[d，Or[And[Mod[IntegerLength@#，3]==2,成员Q[{11,18},From数字@采取[d日,2,]]],弗斯特@d日==8]]@整数位数@ # &] (* _迈克尔 扩散系数 弗利格_,二月 13 2017*)
MemberQ[{11，18}，FromDigits@Take[d，2]]，First@d==8]]@IntegerDigits@#&](*迈克尔·德弗利格2017年2月13日*）
|
|
|
|
|
|
|
#14通过迈克尔·德弗利格2017年2月13日星期一22:47:15 EST |
|
| 数学
|
选择[Range[10^3]，Function[d，Or[And[Mod[IntegerLength@#，3]==2，
MemberQ[{11，18}，FromDigits@Take[d，2]]，First@d==8]]@IntegerDigits@#&](*迈克尔·德弗利格2017年2月13日*）
|
|
| 状态
|
提出
编辑
|
|
|
|
|
|
|
#13通过迈克尔·德弗利格2017年2月13日星期一22:39:54 EST |
|
|
|
|
|
讨论
|
| 2月13日周一
| 22:40
| 迈克尔·德弗利格: *18,000.
|
|
|
|
|
|
|
#12通过迈克尔·德弗利格2017年2月13日星期一22:39:32 EST |
|
| 数学
|
选择[Range[10^3]，或[MemberQ[{11，18}，#]，First@IntegerDigits@#==8]&](*迈克尔·德弗利格2017年2月13日*）
|
|
| 状态
|
提出
编辑
|
|
|
|
|
讨论
|
| 2月13日周一
| 22:39
| 迈克尔·德弗利格：对不起，我的程序没有抓到11000和17000等。
|
|
|
|
|
|
|
#11通过迈克尔·德弗利格2017年2月13日星期一22:36:51 EST |
|
|
|
|
|
|
|
#10通过迈克尔·德弗利格2017年2月13日星期一22:36:46 EST |
|
| 数学
|
选择[范围[10^3]，或[MemberQ[｛11，18｝，#]，第一个@IntegerDigits@#==8]&](*迈克尔·德弗利格2017年2月13日*）
|
|
| 状态
|
提出
编辑
|
|
|
|
|
|
