OFFSET
1,1
COMMENTS
The central digit A010888(2*n) cyclically repeats the nine digits (2, 4, 6, 8, 1, 3, 5, 7, 9) in this order.
The sum of the digits of n plus the digits of the reverse of n is always simply 2 times the sum of the digits of n. - Harvey P. Dale, Aug 12 2019
REFERENCES
Amarnath Murthy
EXAMPLE
For a(17): 1+7+7+1 = 16. 1+6 = 7. Thus the center digit is 7 and a(17) = 17771.
For a(23): 2+3+3+2 = 10. 1+0 = 1. Thus the center digit is 1 and a(23) = 23132.
MATHEMATICA
nxt[n_]:=Module[{idn=IntegerDigits[n], b, c}, b=NestWhile[Total[IntegerDigits[ # ]]&, 2 Total[idn], #>9&]; c=Reverse[idn]; FromDigits[Join[idn, {b}, c]]]; Table[ nxt[n], {n, 20}] (* Harvey P. Dale, Aug 12 2019 *)
PROG
(PARI) A082944(n)=fromdigits(concat([digits(n), (2*n-1)%9+1, Vecrev(digits(n))])) \\ Cf. A010888. - R. J. Cano, Jan 05 2022
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 06 2003
EXTENSIONS
Definition, comment and example corrected by M. F. Hasler, Jan 05 2022
STATUS
approved