OFFSET
1,2
COMMENTS
Subsequence of the 7-smooth numbers (A002473).
For 2 <= d <=9, powers of d that contain digit d are in the sequence, e.g. every power of 5 and every odd power of 9.
EXAMPLE
64 is a member as 64 = 4*4*4; 135 is a member as 135 = 3*3*3*5.
PROG
(PARI) digits29(n) = local(v, d); v=[]; while(n>0, d=divrem(n, 10); n=d[1]; if(d[2]>1, v=concat(d[2], v))); v {recdiv(n, s) = local(b, j, d); b=0; j=1; while(b<1&&j<=length(s), d=divrem(n, s[j]); if(d[2]==0, if(d[1]>1, b=recdiv(d[1], s), b=1)); j++); b} for(n=1, 3650, if(n==1||recdiv(n, digits29(n)), print1(n, ", ")))
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Nov 22 2004
EXTENSIONS
Edited, corrected and extended by Klaus Brockhaus, Nov 25 2004
STATUS
approved