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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A136623号 a(n)是<=n的最大素数幂,与n互素。 1
1, 1, 2, 3, 4, 5, 5, 7, 8, 9, 9, 11, 11, 13, 13, 13, 16, 17, 17, 19, 19, 19, 19, 23, 23, 25, 25, 27, 27, 29, 29, 31, 32, 31, 32, 31, 32, 37, 37, 37, 37, 41, 41, 43, 43, 43, 43, 47, 47, 49, 49, 49, 49, 53, 53, 53, 53, 53, 53, 59, 59, 61, 61, 61, 64, 61, 64, 67, 67, 67, 67, 71, 71, 73 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
a(n)=A031218号(n-1)对于所有n,其中2<=n<=33。
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
<=34的最大素数幂是32=2^5。但32与34并不互质。下一个较小的素数幂是31=31^1。31确实是34的互质;因此a(34)=31。
MAPLE公司
f: =程序(n)局部k;
从n到k乘以-1 do
如果igcd(k,n)=1且nops(numtheory:-factorset(k))<=1,则返回k fi
结束进程:
地图(f,[1.100]美元)#罗伯特·伊斯雷尔2018年1月17日
数学
a[n_]:=对于[k=n,True,k---,如果[CoprimQ[n,k]&&PrimeNu[k]==1,返回[k]];a[1]=a[2]=1;
数组[a,100](*Jean-François Alcover公司2020年8月19日*)
黄体脂酮素
(PARI)a(n)={x=n;while((matsize(factor(x))[1]>1)|(gcd(x,n)!=1),x---);x}\\迈克尔·波特2009年10月7日
交叉参考
囊性纤维变性。A031218号.
关键词
非n
作者
勒罗伊·奎特2008年4月14日
扩展
更多术语来自迈克尔·波特2009年10月7日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月25日21:12。包含373712个序列。(在oeis4上运行。)