A045539 Multiply by 5 and reverse.
1, 5, 52, 62, 13, 56, 82, 14, 7, 53, 562, 182, 19, 59, 592, 692, 643, 5123, 51652, 62852, 62413, 560213, 5601082, 1450082, 140527, 536207, 5301862, 1390562, 182596, 89219, 590644, 223592, 697111, 5555843, 51297772, 68884652, 62324443, 512226113, 5650311652
Offset: 0
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..1000
- Vaclav Kotesovec, Plot of a(n)^(1/n) for n = 0..100000
Crossrefs
Programs
-
Maple
a:= proc(n) option remember; `if`(n=0, 1, (s-> parse(cat(s[-i]$i=1..length(s))))(""||(5*a(n-1)))) end: seq(a(n), n=0..40); # Alois P. Heinz, Apr 09 2015
-
Mathematica
a[n_] := a[n] = If[n==0, 1, IntegerReverse[5a[n-1]]]; a /@ Range[0, 40] (* Jean-François Alcover, Jan 01 2021 *)