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 A172278 #18 Sep 08 2022 08:45:50
%S A172278 0,2,4,6,8,10,13,15,17,19,21,24,26,28,30,32,35,37,39,41,43,46,48,50,
%T A172278 52,54,56,59,61,63,65,67,70,72,74,76,78,81,83,85,87,89,92,94,96,98,
%U A172278 100,102,105,107,109,111,113,116,118,120,122,124,127,129,131,133,135,138,140
%N A172278 a(n) = floor(n*(sqrt(13)-sqrt(2))).
%C A172278 This is the Beatty sequence for the constant 2.19133771309089424431753254326...
%H A172278 Vincenzo Librandi, <a href="/A172278/b172278.txt">Table of n, a(n) for n = 0..1000</a>
%p A172278 A172278 := proc(n)
%p A172278 floor(n*(sqrt(13)-sqrt(2))) ;
%p A172278 end proc:
%p A172278 seq(A172278(n),n=0..30) ; # _R. J. Mathar_, Sep 04 2016
%t A172278 With[{c = Sqrt[13] - Sqrt[2]}, Floor[c Range[0, 80]]] (* _Vincenzo Librandi_, Aug 02 2013 *)
%o A172278 (Magma) [Floor(n*(Sqrt(13)-Sqrt(2))): n in [0..80]]; // _Vincenzo Librandi_, Aug 02 2013
%o A172278 (PARI) for(n=0, 50, print1(floor(n*(sqrt(13)-sqrt(2))), ", ")) \\ _G. C. Greubel_, Jul 05 2017
%Y A172278 Cf. A172264, A172266-A172270, A172272-A172277.
%Y A172278 Similar to but strictly different from A276383.
%K A172278 nonn,easy
%O A172278 0,2
%A A172278 _Vincenzo Librandi_, Jan 30 2010