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

 


搜索: 编号:a097248
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
a(n)是迭代k->时达到的最终稳定点A097246号(k) ,从k=n开始。
+0
19
1, 2, 3, 3, 5, 6, 7, 6, 5, 10, 11, 5, 13, 14, 15, 5, 17, 10, 19, 15, 21, 22, 23, 10, 7, 26, 15, 21, 29, 30, 31, 10, 33, 34, 35, 15, 37, 38, 39, 30, 41, 42, 43, 33, 7, 46, 47, 15, 11, 14, 51, 39, 53, 30, 55, 42, 57, 58, 59, 7, 61, 62, 35, 15, 65, 66, 67, 51, 69, 70, 71, 30, 73, 74, 21
抵消
1, 2
评论
a(n)=r(n,m),其中r(n、m)=r=A097246号(r(n,k-1)),r(n、0)=n。(原始定义。)
1972年2月48日(n) =r(n,a(n))。
发件人安蒂·卡图恩2016年11月15日:(开始)
上述评论可以解释为A097249号(n) <=a(n)。
所有项都是无平方的,无平方数是不动点。
这些也是迭代时最终达到的固定点A277886型.
(结束)
链接
配方奶粉
一个(A005117号(n) )=A005117号(n) ●●●●。
发件人安蒂·卡图恩2016年11月15日:(开始)
如果A008683号(n) <>0[当n无平方时],a(n)=n,否则a(n(A097246号(n) )。
如果A277885型(n) =0,a(n)=n,否则a(n(A277886型(n) )。
A007913号(a(n))=(n)。
一个(A007913号(n) )=A007913号(n) ●●●●。
A048675号(a(n))=A048675号(n) ●●●●。
一个(A260443型(n) )=A019565号(n) ●●●●。
(结束)
发件人彼得·穆恩2020年2月6日:(开始)
a(1)=1;a(p)=p,对于素数p;a(m*k)=A331590型(a(m),a(k))。
一个(A331590型(米,克)=A331590型(a(m),a(k))。
a(n^2)=a(A003961号(n) )=A003961号(a(n))。
一个(A225546型(n) )=a(n)。
a(n)=A225546型(2^A048675号(n) )=A019565号(A048675号(n) )。
一个(A329050型(n,k))=素数(n+k-1)=A000040型(n+k-1)。
一个(A329332飞机(n,k))=A019565号(n*k)。
等效地,a(A019565号(n) ^k)=A019565号(n*k)。
(结束)
发件人安蒂·卡图恩,2020年2月22日至25日和3月1日:(开始)
一个(A019565号(x)*A019565号(y) )=A019565号(x+y)。
一个(A332461(n) )=A332462型(n) ●●●●。
一个(A332824飞机(n) )=A019565号(n) ●●●●。
一个(A277905型(n,k))=A277905型(n,1)=A019565号(n) ,对于所有n>=1和1<=k<=A018819号(n) ●●●●。
(结束)
数学
表[FixedPoint[Times@@Map[#1^#2&@@#&,分区[#,2,2]&@Flatten[FactorInteger[#]/。{p,e}/;e>=2:>{If[OddQ@e,{p,1},{1,1}],{NextPrime@p,Floor[e/2]}]&,n],{n,75}](*迈克尔·德弗利格2017年3月18日*)
黄体脂酮素
(平价)
A097246号(n) ={my(f=因子(n));prod(i=1,#f~,(下一素数(f[i,1]+1)^;
1972年2月48日(n) ={我的(k=A097246号(n) );而(k<>n,n=k;k=A097246号(k) );k、 };
\\安蒂·卡图恩2017年3月18日
(方案);;带有记忆宏定义
;; 两种实现:
(定义(1972年2月48日n) (如果(不是(零(A008683号n) )n个(1972年2月48日(A097246号n) ))
(定义(1972年2月48日n) (如果(零(A277885型n) )n个(1972年2月48日(A277886型n) ))
;;安蒂·卡图恩2016年11月15日
(Python)
来自sympy import factorint,nextprime
从运算符导入mul
定义a097246(n):
f=因子(n)
如果n==1,则返回1,否则对于f中的i,reduce(mul,[(nextprime(i)**int(f[i]/2))*(i**(f[i]%2))
定义a(n):
k=a097246(n)
而k=编号:
n=k
k=a097246(k)
返回k#因德拉尼尔·戈什2017年5月15日
交叉参考
值的范围为A005117号.
A003961号,A225546型,A277885型,A277886型,A331590型用于表示此序列中各项之间的关系。
公式部分还详细说明了序列如何映射A007913号,A260443型,A329050型,A329332飞机.
请参阅中的注释/公式A283475型,A283478号,A331751型给出了它们与这个序列的关系。
关键词
非n
作者
扩展
名称已更改,原始定义已移至“注释”部分安蒂·卡图恩2016年11月15日
状态
经核准的

搜索在0.004秒内完成

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

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

上次修改时间:2024年9月23日13:01 EDT。包含376164个序列。(在oeis4上运行。)