|
|
A162393号 |
| 斐波那契数等于一个promic数或一个promic数的字谜。 |
|
1
|
|
|
2, 21, 6765, 10946, 2178309, 14930352, 102334155, 701408733, 1134903170, 4807526976, 20365011074, 32951280099, 225851433717, 1548008755920, 10610209857723, 72723460248141, 117669030460994, 498454011879264, 2111485077978050, 3416454622906707
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
例子
|
|
|
MAPLE公司
|
数字:=200;digFreq:=处理(n)dgs:=转换(n,基数,10);c:=[序列(0,j=0..9)];对于dgs中的d do c:=亚音速(d+1=op(d+1,c)+1,c);od:c;结束时间:
isAna:=进程(a,b)返回(digFreq(a)=digFreg(b));结束时间:
isA002378:=进程(n)k:=楼层(sqrt(n));返回(k*(k+1)=n);结束时间:
对于n从1到f:=组合[fibonacci](n);fdgs:=A055642号(f) ;对于地板上的k(sqrt(10^(fdgs-1)),做p:=k*(k+1);如果A055642号(p) >fdgs然后断裂;fi;如果是Ana(p,f),则打印f(“%d,\n”,f);断裂;fi;od;日期:#R.J.马塔尔2009年8月14日
|
|
黄体脂酮素
|
(Python)
从数学导入isqrt
从itertools导入计数,islice
def promics(d):#带d位数的promic数生成器
ilb,lb,ub=isqrt(10**(d-1)-1),10**(d-1),10**d
如果d==1:产量0
对于计数i(ilb):
p=i*(i+1)
如果p<lb:继续
elif p>=ub:中断
产量p
def agen():序列项的#生成器
#如果插入0,则生成0#取消注释
f、 g,n,adict=1,2,1,dict()
对于计数(1)中的d:
P=promics(d)中P的集合(“”.join(sorted(str(P)))
当f<10**d时:
P中的if“”.join(sorted(str(f))):生成f
f、 g=克,f+克
打印(列表(islice(agen(),16))#迈克尔·布拉尼基2024年2月19日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
扩展
|
a(19)-a(20)来自柴华武2017年1月2日
|
|
状态
|
经核准的
|
|
|
|