OFFSET
1,1
EXAMPLE
4888884 is in the sequence since 4888884 = 1*4888884 = 2*2444442 = 4*1222221 = 11*444444 = 22*222222 = 44*111111 = 111*44044 = 121*40404 = 222*22022 = 242*20202 = 444*11011 = 484*10101 = 1001*4884 = 1221*4004 = 2002*2442.
MATHEMATICA
f[n_]:=f[n]=Length[Select[Divisors[n], #<=n^(1/2)&&FromDigits[ Reverse[IntegerDigits[ # ]]]==#&&FromDigits[Reverse[IntegerDigits [n/# ]]]==n/#&]]; Do[If[f[n]==15, Print[n]], {n, 125000000}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Farideh Firoozbakht, Dec 11 2006
EXTENSIONS
a(6)-a(20) from Donovan Johnson, Aug 05 2009
STATUS
approved