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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A125087号 a(1)=1。对于n>1,a(n)=等于n的素因式分解中至少一个指数的项数(从序列的前n-1项中)。 4
1, 1, 2, 1, 3, 3, 3, 3, 1, 4, 4, 5, 4, 4, 4, 5, 4, 5, 4, 5, 4, 4, 4, 8, 1, 5, 4, 6, 5, 5, 5, 8, 5, 5, 5, 1, 6, 6, 6, 10, 6, 6, 6, 7, 7, 6, 6, 17, 1, 8, 7, 8, 7, 11, 7, 11, 7, 7, 7, 8, 7, 7, 8, 9, 7, 7, 7, 8, 7, 7, 7, 5, 7, 7, 8, 8, 7, 7, 7, 18, 11, 7, 7, 8, 7, 7, 7, 11, 7, 8, 7, 8, 7, 7, 7, 19, 7, 8, 8, 1, 8 (列表图表参考历史文本内部格式)
抵消
1,3
链接
卡塔兹娜·马提拉,n=1..1000时的n,a(n)表
例子
12=2^2*3^1,所以12的素数乘积的指数是1和2。序列的前11项中有4项等于1。(这些术语是a(1)、a(2)、a(4)、a(9))。有一项(a(3))等于2。所以a(12)=4+1=5。
14 = 2^1 * 7^1. 因此,14的素数因子化中唯一不同的指数是1。序列的前13项中有4项等于1。所以a(14)=4。
数学
f[l_List]:=追加[l,Length@Select[l,MemberQ[Last/@FactorInteger[Length[l]+1],#]&]];嵌套[f,{1},100](*雷·钱德勒2006年11月21日*)
黄体脂酮素
(Maxima)/*程序来自卡塔兹娜·马提拉,2008年2月19日:变量最大值=我们需要多少条件。生成1000个术语需要几个小时:*/
“|”(a,b):=如果b=0,则为true-else,如果a=0,那么为false else,如果(floor(b/a))=(b/a),则为真-else false;
最大值:1000;
中缀(“|”);
deg(n,p):=如果p<2,则0 else块(d:0,loop,if(p^(d+1))|n),则d:d+1 else go(end),go(loop),end,d);
f: makelist(0,i,1,max);
dg:名单(0,i,1,max);
f[1]:1;
对于n:2到max-do块(对于i:2到n-do dg[i]:deg(n,i),k:0,loop1,k:k+1,p:2,loop,如果(f[k]=dg[p]),则块(f[n]:f[n]+1,p:n+1),如果(p<=n),则p:next_prime(p),如果;
交叉参考
囊性纤维变性。A125088号.
关键词
非n
作者
勒罗伊·奎特2006年11月19日
扩展
由扩展雷·钱德勒2006年11月21日
状态
经核准的

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

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

最后修改时间:美国东部时间2024年4月19日12:14。包含371792个序列。(在oeis4上运行。)