登录
A064476号
对于素数分解为p_1*p_2*p_3*的整数n*p_m设n*=(p_1+1)*(p_2+1)**(p_m+1)(A064478号); 序列给出了n,使得n*可以被n整除。
12
1, 6, 12, 36, 72, 144, 216, 432, 864, 1296, 1728, 2592, 5184, 7776, 10368, 15552, 20736, 31104, 46656, 62208, 93312, 124416, 186624, 248832, 279936, 373248, 559872, 746496, 1119744, 1492992, 1679616, 2239488, 2985984, 3359232, 4478976
抵消
1,2
评论
可以通过定义x*=(p_1+v)*(p_2+v)来概括。。(pn+v)其中v是任何整数。
不难看出,这些数字的形式为a(n)=2^i*3^j,其中j<=i<=2j。因此,1是唯一的奇数项;如果n n*,则n*n*。i和j的值如所示A064514号A064515号. -弗拉德塔·约沃维奇N.J.A.斯隆2001年10月7日
链接
哈里·史密斯,n=1..50时的n,a(n)表
例子
12在序列中是因为12=2*2*3,所以12*是3*3*4=36,36可以被12整除。
数学
diQ[n_]:=可除[Times@@(#+1&/@Flatten[Table[First[#],{Last[#]}]&/@FactorInteger[n]]),n];选择[Range[4500000],diQ](*哈维·P·戴尔,2011年8月16日*)
黄体脂酮素
(ARIBAS):函数p2p3(停止:整数):数组;变量c,i,j,x:整数;b: 布尔值;ar:数组;开始ar:=分配(数组,停止);x:=0;c:=0;b:=c<停止;而b做i:=x;j:=x-i;当b和i>=j时,如果i<=2*j,那么ar[c]:=(2^i*3^j,i,j);inc(c);b:=c<停止;结束;dec(i);inc(j);结束;inc(x);结束;返回排序(ar,comparefirst);结束;函数comparefirst(x,y:数组):整数;开始返回y[0]-x[0];结束;函数a064476(maxarg:整数);var j:整数;ar:数组;开始ar:=p2p3(最大arg);对于j:=0到maxarg-1,请写入(ar[j][0],“”);结束;结束;a064476(35)。
(PARI)ns(n)={局部(f,p=1);f=因子(n);对于(i=1,矩阵大小(f)[1],p*=(1+f[i,1])^f[i、2]);返回(p)}{n=0;对于(m=1,10^9,如果(ns(m)%m==0,写入(“b064476.txt”,n++,“”,m);如果(n==100,中断))}\\哈里·史密斯2009年9月15日
(哈斯克尔)
a064476 n=a064476_list!!(n-1)
a064476_list=过滤器(\x->a003959 x`mod`x==0)[1..]
--莱因哈德·祖姆凯勒2013年2月28日
关键词
非n,容易的,美好的
作者
乔纳森·艾尔斯(Jonathan.Ayres(AT)btinternet.com),2001年10月6日
扩展
更多术语来自弗拉德塔·约沃维奇2001年10月7日
状态
经核准的