|
|
A045541号 |
| 将前一项平方,然后删除前一项的数字。 |
|
2
|
|
|
2, 4, 16, 25, 6, 3, 9, 81, 656, 43033, 18518989, 3422322, 11718787168, 33299240224, 118856557176, 42330949, 17161, 29449992, 867300880006, 522114591215, 760366360676, 5815244491919, 3370600766306, 11949525822594424885
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,1
|
|
评论
|
100步后,进入长度为307的循环:对于n>100,a(n+307)=a(n);a(167)=88703778700083013187738001是最大项-莱因哈德·祖姆凯勒2011年9月15日
|
|
链接
|
|
|
例子
|
a(100)^2=46629^2=2174263641-->1731=a(301);
a(407)^2=646 ^2=417316-->1731=a(408)=a(301+307)。
|
|
数学
|
nxt[n_]:=模块[{idn=IntegerDigits[n],idn2=Integer Digits[n^2]},表[idn2=删除事例[idn2,idn[i]]],{i,长度[idn]}];源数字[idn2];嵌套列表[nxt,2,30](*哈维·P·戴尔,2011年10月29日*)
|
|
黄体脂酮素
|
(哈斯克尔)
a045541 n=a045541_列表!!n个
a045541_list=2:f 2,其中
f x=x’:f x’
其中x'=读取$filter(`notElem`show x)$show(x^2)
(Python)
对于范围内的_(10**4):
….l=int(“”.join(d代表str(l**2)中的d,如果集合(str(l))中没有d))
(PARI)deldig(n,m)=我的(s=集合(数字(m)));从数字(选择(k->!setsearch(s,k),数字(n))
a(n)=如果(n,my(k=a(n-1));深挖(k^2,k),2)\\查尔斯·格里特豪斯四世2015年6月16日
|
|
交叉参考
|
|
|
关键词
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|