A022158 First column of spectral array W(sqrt(3)).
1, 5, 8, 10, 13, 17, 20, 22, 25, 29, 32, 34, 38, 41, 43, 46, 50, 53, 55, 58, 62, 65, 67, 71, 74, 77, 79, 83, 86, 88, 91, 95, 98, 100, 103, 107, 110, 112, 116, 119, 122, 124, 128, 131, 133, 136, 140, 143, 145, 148, 152, 155, 157, 161, 164, 166, 169, 173, 176
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..5000
- A. Fraenkel and C. Kimberling, Generalized Wythoff arrays, shuffles and interspersions, Discrete Mathematics 126 (1994) 137-149.
Crossrefs
Cf. A022159.
Programs
-
Magma
[Floor(Sqrt(3)*Floor(n*Sqrt(3))): n in [1..50]]; // G. C. Greubel, May 27 2018
-
Mathematica
Table[Floor[Sqrt[3]*Floor[Sqrt[3]*n]], {n, 1, 50}] (* G. C. Greubel, May 27 2018 *)
-
PARI
a(n) = floor(sqrt(3)*floor(sqrt(3)*n)); \\ Michel Marcus, Mar 05 2014
Extensions
More terms from Michel Marcus, Mar 05 2014