登录

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

 

提示 （来自的问候整数序列在线百科全书!) A305025 a（n）=A001221号(A004394美元（n） ）。 1 0, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 8, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 9, 10, 10, 10, 10, 10, 10, 10, 10, 10, 11 (列表;图表;参考;听;历史;文本;内部格式) 抵消 1,4 评论 多余数的不同素因子的个数。 类似于A108602号（相反，它属于A002182号，高度合成的数字）。 a（23）=5，而A108602号(23) = 4; 23是该序列不同于的最小索引A108602号. 链接 阿米拉姆·埃尔达尔，n=1..1000时的n，a（n）表 例子 A004394美元（8） =48=2^4*3，它有两个不同的素因子，所以a（8）=2。 数学 （*首先，在A004394美元添加到术语列表中：*） f[w_]：=Times@@Flatten@{Complement[#1，Union[#2，#3]]，乘积[Prime@i，{i，PrimePi@#}]&/@#2，阶乘/@#3}&@@ToExpression@{StringSplit[w，_？（！DigitQ@#&）]，StringCase[w，（x:数字字符..）~~“#”：>x]，String Case[w，（x:DigitCharacter..）~~~“！”：>x]}； s=Map[Which[StringTake[#，1]==｛“#”｝，f@Last@StringSplit@Last@#，StringTake[#，1]==｛｝，Nothing，True，ToExpression@StringSplit[#][1，-1]]&，Drop[Import[“b004394.txt”，“Data”]，3]]； PrimeNu[Take[s，105]] 交叉参考 囊性纤维变性。A001221号，A004394美元，A108602号. 上下文中的序列：A343265型 A059396号 A108602号*A363743型 A085290号 A108611号 相邻序列：A305022型 A305023型 A305024型*A305026型 A305027型 A305028型 关键词 非n，容易的 作者 迈克尔·德弗利格，2018年6月30日 状态 经核准的

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

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

上次修改时间：美国东部夏令时2024年4月25日21:09。包含371989个序列。（在oeis4上运行。）