搜索： 编号：a351713
|
| |
| |
|
|
|
0, 9, 31, 975, 297097, 816867, 4148165871, 152488124529, 1632977901693, 11162529166917, 11925833175477, 3047549778123957, 3894487365191355, 8920885515768255
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1、2
|
|
|
链接
|
|
|
|
例子
|
----------------------------------------------------------
1 0 0 0
2 9 1001 10001
3 31 11111 10000001
4 975 1111001111 100010000010001
5 297097 1001000100010001001 100001000000101000000100001
|
|
|
数学
|
lucasPhalQ[n_]：=模块[｛s＝｛｝，m＝n，k＝1｝，While[m＞0，If[m＝＝1，k＝1；AppendTo[s，k]；m=0，如果[m==2，k=0；附加到[s，k]；m=0，而[LucasL[k]<=m，k++]；k--；附加到[s，k]；m-=卢卡斯L[k]；k=1]]]；回文Q[Integer Digits[Total[2^s]，2]]；连接[{0}，选择[Range[1，10^6，2]，回文[IntegerDigits[#，2]]&&lucasPalQ[#]&]]
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础,更多
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.003秒内完成
|
