OFFSET
1,1
LINKS
David A. Corneth, Table of n, a(n) for n = 1..29
Carlos Rivera, Puzzle 25. Composed primes, The Prime Puzzles and Problems Connection.
MAPLE
f:= proc(n) local k;
for k from 10^(n-1) do
if numtheory:-bigomega(k) = n then return k fi
od
end proc:
map(f, [$1..20]); # Robert Israel, May 31 2018
MATHEMATICA
npf[n_]:=Module[{k=1, st=10^(n-1)-1}, While[PrimeOmega[st+k]!=n, k++]; st+k]; Array[npf, 20] (* Harvey P. Dale, Mar 25 2012 *)
PROG
(Python)
from sympy import factorint
def a(n):
for m in range(10**(n-1), 10**n):
if sum(factorint(m).values()) == n: return m
print([a(n) for n in range(1, 13)]) # Michael S. Branicky, Feb 10 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Dec 15 1998
EXTENSIONS
More terms from Matthew Conroy, May 27 2001
Offset corrected, and a(19)-a(20) from Robert Israel, May 31 2018
STATUS
approved