|
%I #12 Jan 01 2021 08:06:45
%S 1,9,18,261,9432,88848,236997,3792312,80803143,782822727,3454045407,
%T 36680468013,711212421033,7929871190046,41401704886317,
%U 358679343516273,7546461904118223,70046073175181976,487736675856414036,4236277072800369834,60582330255639462183
%N Multiply by 9 and reverse.
%H Alois P. Heinz, <a href="/A133361/b133361.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = reverse(9*a(n-1)) where a(1) = 1.
%F Conjecture: a(n)^(1/n) tends to 10. - _Vaclav Kotesovec_, Jan 03 2020
%p a:= proc(n) option remember; `if`(n=1, 1,
%p (s-> parse(cat(s[-i]$i=1..length(s))))(""||(9*a(n-1))))
%p end:
%p seq(a(n), n=1..25); # _Alois P. Heinz_, Apr 09 2015
%t a[n_] := a[n] = If[n==1, 1, IntegerReverse[9a[n-1]]];
%t a /@ Range[40] (* _Jean-François Alcover_, Jan 01 2021 *)
%Y Cf. A036447 (*2), A163632 (*3), A132064 (*4), A045539 (*5), A132078 (*6), A132114 (*7), A132113 (*8).
%K base,nonn
%O 1,2
%A Rachit Agrawal (rachit_agrawal(AT)daiict.ac.in), Oct 26 2007
%E More terms from _Alois P. Heinz_, Apr 09 2015
|
