OFFSET
1,1
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
MATHEMATICA
Array[(k = #1; While[PrimeOmega[k] == #2, k++]; k) & @@ {#, PrimeOmega[#]} &, 64] (* Michael De Vlieger, Feb 23 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, May 15 2002
STATUS
approved