A096138 a(1) = 1, a(n) = digit reversal of n*a(n-1).

1, 2, 6, 42, 12, 27, 981, 8487, 38367, 76383, 312048, 6754473, 94180878, 2922358131, 56917353834, 443166776019, 3232915383357, 62400967429185, 5154511838165811, 22613367632090301, 123698372027088474, 8246495954814631272

Offset

1,2

Comments

a(10^n) is the digit reversal of a(10^n -1).

a(n) = A004086(A034874(n)). [Reinhard Zumkeller, Jan 02 2012]

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..250

Mathematica

nxt[{n_, a_}]:={n+1, FromDigits[Reverse[IntegerDigits[(1+n)*a]]]}; Transpose[ NestList[ nxt, {1, 1}, 30]][[2]] (* Harvey P. Dale, Dec 31 2013 *)

Prog

(Haskell)
a096138 n = a096138_list !! (n-1)
a096138_list = 1 : g 2 1 where
   g x y = z : g (x + 1) z where z = a004086 (x * y)
-- Reinhard Zumkeller, Jan 02 2012

Crossrefs

Sequence in context: A336281 A387041 A326268 * A004153 A071440 A371513

Adjacent sequences: A096135 A096136 A096137 * A096139 A096140 A096141

Keyword

base,nonn

Author

Amarnath Murthy, Jul 07 2004

Extensions

Edited and extended by Klaus Brockhaus, Jul 09 2004

Status

approved