A072452 a(n) = reversal(a(n-1)+n) for n>0, a(0) = 0.

0, 1, 3, 6, 1, 6, 21, 82, 9, 81, 19, 3, 51, 46, 6, 12, 82, 99, 711, 37, 75, 69, 19, 24, 84, 901, 729, 657, 586, 516, 645, 676, 807, 48, 28, 36, 27, 46, 48, 78, 811, 258, 3, 64, 801, 648, 496, 345, 393, 244, 492, 345, 793, 648, 207, 262, 813, 78, 631, 96, 651, 217, 972

Offset

0,3

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Nick Hobson, Python program for this sequence

Example

a(10)=19 given: a(11) = rev(a(10)+11) = rev(19+11) = rev(30) = 3; a(12) = rev(a(11)+12) = rev(3+12) = rev(15) = 51.

Mathematica

nxt[{n_, a_}]:={n+1, IntegerReverse[a+n+1]}; NestList[nxt, {0, 0}, 70][[;; , 2]] (* Harvey P. Dale, Dec 19 2024 *)

Prog

(Python) # See Hobson link.
(Haskell)
a072452 n = a072452_list !! n
a072452_list = 0 : map a004086 (zipWith (+) a072452_list [1..])
-- Reinhard Zumkeller, Feb 09 2012

Crossrefs

Cf. A004086.

Sequence in context: A065233 A345681 A243658 * A155830 A340310 A096602

Adjacent sequences: A072449 A072450 A072451 * A072453 A072454 A072455

Keyword

nonn,base,look

Author

Reinhard Zumkeller, Aug 02 2002

Status

approved