|
|
|
|
|
|
|
|
|
#14通过哈维·P·戴尔2023年3月1日星期三15:13:35 EST |
|
|
|
|
|
|
|
#13通过哈维·P·戴尔美国东部时间2023年3月1日星期三15:13:32 |
|
| 数学
|
选择[Range[700]，Total[Times@@@Partition[Riffle[IntegerDigits[#]，{1，-1}，{2，-1，2}]，2]]==2&](*哈维·P·戴尔2023年3月1日*）
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#12通过米歇尔·马库斯2020年8月5日星期三12:09:00 EDT |
|
|
|
|
|
|
|
#11通过乔格·阿恩特2020年8月5日星期三11:30:37 EDT |
|
|
|
|
|
|
|
#10通过罗伯特·伊斯雷尔美国东部时间2020年8月5日星期三11:08:59 |
|
|
|
|
|
|
|
#9通过罗伯特·伊斯雷尔2020年8月5日星期三11:08:21 EDT |
|
| 评论
|
a（n）==9*（-1）^d（mod 11），如果a（n）有d个数字-罗伯特·伊斯雷尔2020年8月5日
|
|
| 链接
|
Robert Israel，<a href=“/A061471号/b061471.txt“>n表，n=1..10000时为a（n）</a>
|
|
| MAPLE公司
|
filter：=proc（n）局部d，L，j；
五十： =换算（n，基数，10）；
d： =nops（L）；
加（L[j]*（-1）^（d-j），j=1..d）=2
结束进程：
选择（过滤器，[1..1000]美元）#罗伯特·伊斯雷尔2020年8月5日
|
|
| 状态
|
经核准的
编辑
|
|
|
|
|
|
|
#8个通过布鲁诺·贝塞利2016年11月17日星期四09:42:28 EST |
|
|
|
|
|
|
|
#7通过乔格·阿恩特2016年11月17日星期四08:27:53 EST |
|
|
|
|
|
|
|
#6通过Jean-François Alcover公司2016年11月17日星期四08:11:30 EST |
|
|
|
|
|
|
|
#5通过Jean-François Alcover公司2016年11月17日星期四08:11:17 EST |
|
| 数学
|
okQ[n_]：=使用[{id=IntegerDigits[n]}，id.Array[2 Mod[#，2]-1&,&,长度[id]]==2]；选择[范围[1000]，okQ](*Jean-François Alcover公司2016年11月17日*）
|
|
|
|
|
|
