OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A363061型 k≤P(n)的数量,即rad(k)|P(n,其中rad(n)=A007947号(n) 和P(n)=A002110号(n) ●●●●。 4
1, 2, 5, 18, 68, 283, 1161, 4843, 19985, 83074, 349670, 1456458, 6107257, 25547835, 106115655, 440396113, 1833079809, 7642924612, 31705433101, 131711607956, 546283729493, 2257462298234, 9339325821411, 38593708318690, 159600066415313, 661371515924516, 2736805917843710 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,2
链接
伯特·多贝勒,Python程序
配方奶粉
a(n)=A010846号(A002110号(n) )。
a(n)>=2^n。
例子
a(0)=1,因为P(0)=1和1|1。
a(1)=2,因为P(1)=2以及1|2和2|2。
a(2)=5,因为P(2)=6,并且对于m={1,2,3,4,6},rad(m)|6。
a(3)=18,因为P(3)=30,rad(m)|30,对于m={1,2,3,4,5,6,8,9,10,12,15,16,18,20,24,25,27,30}等。
关于a(3),我们看到在2、3和5的素幂范围的张量积中有18项不超过30:
5^0X|2^0 2^1 2^2 2^3 2^4 5^1X|2 ^0 2 ^1 2 ^2 5^2X|2
-------------------------- ------------------ ----------
3^0 | 1 2 4 8 16 3^0 | 5 10 20 3^0 | 25
3^1 | 3 6 12 24 3^1 | 15 30
3^2 | 9 18
3^3 | 27
因此,a(3)=18。事实证明,这种方法对于较大的n很方便。
数学
f[1]=1;f[n_]:=函数[w,
ToExpression@StringJoin[“块[{n=”,ToString@n,
“,k=0},展平@表格[k++,”,
大多数@Flatten@Map[{#,“,”}&,#],“];k]”]&@
地图索引[
函数[p,StringJoin[“{”,ToString@Last@p,“,0,Log[”,
ToString@First@p,“,n/(”,
ToString@InputForm[Times@@Map[Power@@#&,Take[w,First@#2-1]],
“)]}”]]@w[[First@#2]]&,w]]@
映射[{#,ToExpression[“p”<>ToString@PrimePi@#]}&,
FactorInteger[n][[All,1]]];
地图[f,折叠列表[Times,1,Prime@Range@9]
交叉参考
囊性纤维变性。A002110号A007947号A010846号.
关键词
非n坚硬的
作者
迈克尔·德弗利格2023年6月16日
扩展
更正了a(15)并从中添加了a(16)-a(23)伯特·多贝莱尔2023年6月27日
a(24)-a(26)来自马丁·埃伦斯坦2023年7月8日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月23日18:59。包含372765个序列。(在oeis4上运行。)