OFFSET
1,1
EXAMPLE
735 is in the sequence because the divisors of 735 are {1, 3, 5, 7, 15, 21, 35, 49, 105, 147, 245, 735} and 35 is the 7th divisor of 735.
MAPLE
with(numtheory):for n from 1 to 100000 do:x:=convert(n, base, 10):n1:=nops(x):y:=divisors(n):n2:=nops(y):a:=x[n1]: s:=sum('x[i]*10^(i-1) ', 'i'=1..n1-1):if n2>a and y[a]=s then printf(`%d, `, n):else fi:od:
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Michel Lagneau, Dec 23 2013
STATUS
approved