OFFSET
1,13
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..10000
MATHEMATICA
Table[Mod[FromDigits[Join[Reverse[IntegerDigits[n]], IntegerDigits[n]]], n], {n, 75}] (* Harvey P. Dale, Nov. 26, 2010 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, May 27 2003
EXTENSIONS
Corrected, additional terms provided by Harvey P. Dale, Nov. 26, 2010
STATUS
approved