OFFSET
1,1
COMMENTS
Several obvious patterns can be discerned. For example, 1 plus 10 to any integer power, and 7 followed by any number of 9s followed by 4. - Harvey P. Dale, Nov 03 2024
EXAMPLE
74 = 2*R(73) = 2*37.
7994 = 2*R(7993) = 2*3997.
9321 = 39*R(9320) = 39*239.
MATHEMATICA
Select[Range[2, 8*10^7], Mod[#, IntegerReverse[#-1]]==0&] (* The program generates the first 26 terms of the sequence. *) (* Harvey P. Dale, Nov 03 2024 *)
CROSSREFS
KEYWORD
nonn,base,changed
AUTHOR
Claudio Meller, May 30 2009
EXTENSIONS
More terms from Claudio Meller, Jun 19 2009
a(23)-a(32) from Jason Yuen, Oct 06 2024
STATUS
approved