A085864 a(1) = 2, a(n+1) = a(n)*{tau(a(n))}.
2, 4, 12, 72, 864, 20736, 933120, 117573120, 42326323200, 36315985305600, 146426052752179200, 1475974611741966336000, 37784950060594338201600000, 2031318915257551621718016000000, 212719716805770805826310635520000000
Offset: 1
Keywords
Examples
a(4) = 72 and tau(72)= 12, hence a(5) = 72*12= 864.
Crossrefs
Cf. A064491.
Programs
-
Mathematica
NestList[# DivisorSigma[0,#]&,2,20] (* Harvey P. Dale, Apr 23 2023 *)
-
PARI
for(n=1,16,if(n==1,a=2,a*=numdiv(a)); print(a); )
Extensions
More terms from Ray Chandler, Jul 16 2003
Comments