OFFSET
1,1
LINKS
EXAMPLE
62, 622, 6227, 62277, etc. have the same prime signature p*q.
PROG
(PARI) digs(k) = if (k, digits(k), [0]);
isok(vd, k) = {newv = concat(vd, digs(k)); val = fromdigits(newv); (bigomega(val) == 2) && (omega(val) == 2); }
fnew(vd) = {k = 0; while (! isok(vd, k), k++); k; }
lista(nn) = {k = 6; v = [k]; vd = digs(k); print1(v[1], ", "); for (n=2, nn, k = fnew(vd); print1(k, ", "); v = concat(v, k); vd = concat(vd, digs(k)); ); } \\ Michel Marcus, Jan 21 2017
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Apr 17 2004
EXTENSIONS
More terms from David Wasserman, Jun 07 2007
Edited and a(69)-a(85) moved to comments by Michel Marcus, Jan 21 2017
More terms from Jinyuan Wang, Jul 09 2020
STATUS
approved