OFFSET
1,2
COMMENTS
No more terms < 10^1000. Probably no more terms. - David Wasserman, Feb 10 2005
EXAMPLE
567 is a member as 567 = 3^4*7.
PROG
(PARI) hcn(n) = while (!(n%2), n \=2); while (!(n%3), n \=3); while (!(n%5), n \=5); while (!(n%7), n \=7); n == 1;
for (i = 0, 1000, for (j = 1, 9, my(n = sum(k = j, i + j, (k%10)*10^(i + j - k))); if (hcn(n), print1(n, ", ")))); /* David Wasserman, Feb 10 2005 */
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jul 10 2003
EXTENSIONS
3456 from David Wasserman, Feb 10 2005
STATUS
approved