OFFSET
1,1
COMMENTS
The numbers of terms not exceeding 10^k, for k = 2, 3, ..., are 2, 29, 348, 3548, 35761, 358258, 3583892, 35843109, 358440763, ... . Apparently, the asymptotic density of this sequence exists and equals 0.03584... . - Amiram Eldar, Sep 09 2022
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
k = 36 = 2*2*3*3; exponent set = {2,2}; LCM = 2, product = 4.
MATHEMATICA
Select[Range@ 1600, LCM @@ # != Times @@ # &@ Map[Last, FactorInteger@ #] &] (* Michael De Vlieger, May 15 2016 *)
PROG
(PARI) is(n)=my(f=factor(n)[, 2]); n>9 && lcm(f)!=factorback(f) \\ Charles R Greathouse IV, Jan 14 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jun 17 2002
STATUS
approved