登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 


A094830号
从x=n开始,反复用x+x的数字平方和替换x,直到达到素数;序列给出了步骤数。
5
1, 0, 0, 6, 0, 4, 0, 11, 5, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 5, 13, 9, 0, 4, 11, 12, 17, 3, 0, 8, 0, 8, 7, 1, 7, 3, 0, 5, 7, 4, 0, 3, 0, 3, 7, 8, 0, 2, 2, 2, 6, 3, 0, 10, 2, 3, 1, 3, 0, 3, 0, 2, 2, 18, 2, 11, 0, 2, 6, 9, 0, 10, 0, 1, 1, 2, 5, 1, 0, 16, 2, 8, 0, 3, 11, 6, 10, 2, 0, 4, 1, 15, 2, 1, 9, 2, 0, 7, 7, 1
抵消
1,4
评论
目前尚不清楚该序列是否定义良好,即如果所有n>=1都存在一个整数v,即a(n)=v。如果序列定义不好,则给定的程序是不正确的,因为对于某些整数,它们将陷入无限循环-彼得·卢什尼2016年10月28日
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
a(4)=6,因为4->20->24->44->76->161->199需要6步才能达到素数。
MAPLE公司
f: =程序(n)局部x,k;
x: =n;
对于0中的k do
如果isprime(x),则返回kfi;
x: =x+加法(t^2,t=转换(x,基数,10))
od;
结束进程:
地图(f,[1..100]美元)#罗伯特·伊斯雷尔2016年10月27日
数学
p[n_]:=长度[NestWhileList[#+总数[IntegerDigits[#]^2]&,n!PrimeQ[#]&]]-1;数组[p,100](*哈维·P·戴尔2011年12月3日*)
黄体脂酮素
(PARI)a(n)=我的(k=0);while(!isprime(n),d=数字(n);n+=向量(向量(#d,i,d[i]^2));k++);k个\\大卫·A·科内斯2016年10月27日
关键字
基础,容易的,非n,
作者
杰森·厄尔斯2004年6月13日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年9月21日14:18。包含376087个序列。(在oeis4上运行。)