|
%I #20 May 13 2019 11:19:31
%S 1,2,3,4,5,6,7,8,9,10,12,15,16,18,20,21,24,25,28,30,32,35,36,40,42,45,
%T 48,50,54,56,60,63,64,72,75,84,90,96,105,108,112,120,126,128,135,140,
%U 144,150,160,162,168,180,192,200,210,216,220,224,225,240,252,256,270
%N Record values of the product of the exponents in the prime factorization of highly powerful numbers (A005934).
%H Amiram Eldar, <a href="/A036965/b036965.txt">Table of n, a(n) for n = 1..609</a> (terms 1..300 from T. D. Noe)
%H G. E. Hardy and M. V. Subbarao, <a href="/A005934/a005934.pdf">Highly powerful numbers</a>, Congress. Numer., Vol. 37 (1983), pp. 277-307. (Annotated scanned copy)
%F a(n) = A005361(A005934(n)). - _Amiram Eldar_, May 13 2019
%t Union@ FoldList[Max, Array[Times @@ FactorInteger[#][[All, -1]] &, 10^7]] (* _Michael De Vlieger_, Oct 15 2017 *)
%Y Cf. A005361, A005934, A085629.
%K easy,nonn
%O 1,2
%A _N. J. A. Sloane_.
%E Reference gives an extensive table.
%E More terms from _Naohiro Nomoto_, Jul 25 2001
|
