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 A022158 #13 Sep 08 2022 08:44:46 %S A022158 1,5,8,10,13,17,20,22,25,29,32,34,38,41,43,46,50,53,55,58,62,65,67,71, %T A022158 74,77,79,83,86,88,91,95,98,100,103,107,110,112,116,119,122,124,128, %U A022158 131,133,136,140,143,145,148,152,155,157,161,164,166,169,173,176 %N A022158 First column of spectral array W(sqrt(3)). %H A022158 G. C. Greubel, <a href="/A022158/b022158.txt">Table of n, a(n) for n = 1..5000</a> %H A022158 A. Fraenkel and C. Kimberling, <a href="http://dx.doi.org/10.1016/0012-365X(94)90259-3">Generalized Wythoff arrays, shuffles and interspersions</a>, Discrete Mathematics 126 (1994) 137-149. %t A022158 Table[Floor[Sqrt[3]*Floor[Sqrt[3]*n]], {n, 1, 50}] (* _G. C. Greubel_, May 27 2018 *) %o A022158 (PARI) a(n) = floor(sqrt(3)*floor(sqrt(3)*n)); \\ _Michel Marcus_, Mar 05 2014 %o A022158 (Magma) [Floor(Sqrt(3)*Floor(n*Sqrt(3))): n in [1..50]]; // _G. C. Greubel_, May 27 2018 %Y A022158 Cf. A022159. %K A022158 nonn %O A022158 1,2 %A A022158 _Clark Kimberling_ %E A022158 More terms from _Michel Marcus_, Mar 05 2014