OFFSET
0,2
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
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 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
STATUS
approved