This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A057146 #15 Sep 08 2022 08:45:02 %S A057146 2,3,10,33,109,354,1148,3716,12026,38918,125943,407562,1318899, %T A057146 4268047,13811692,44695576,144637922,468058148,1514667986,4901568568, %U A057146 15861809082,51329892437,166107021206,537533612162,1739495309150,5629125066952,18216231370504 %N A057146 The sequence 2, floor(a), floor(a^2), floor(a^3), ..., with a = 1+sqrt(5). %H A057146 G. Harman, <a href="http://at.yorku.ca/cgi-bin/amca/cadx-39">One hundred years of normal numbers</a> %F A057146 a(n) = floor( (1+sqrt(5))^n ) for n>0, a(0)=2. - _Artur Jasinski_, Nov 22 2006 %t A057146 Join[{2}, Table[Floor[(Sqrt[5] + 1)^n], {n, 1, 30}]] (* _Artur Jasinski_, Nov 22 2006 *) %o A057146 (PARI) a(n) = if (n==0, 2, floor((1+sqrt(5))^n)); \\ _Michel Marcus_, Feb 19 2016 %o A057146 (Magma) [2] cat [Floor((1+Sqrt(5))^n): n in [1..30]]; // _Vincenzo Librandi_, Feb 20 2016 %Y A057146 Cf. A014217. %K A057146 nonn %O A057146 0,1 %A A057146 _N. J. A. Sloane_, Sep 12 2000, May 14 2007