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,2

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.

Mathematica

Table[Floor[Sqrt[3]*Floor[Sqrt[3]*n]], {n, 1, 50}] (* G. C. Greubel, May 27 2018 *)

Prog

(PARI) a(n) = floor(sqrt(3)*floor(sqrt(3)*n)); \\ Michel Marcus, Mar 05 2014
(Magma) [Floor(Sqrt(3)*Floor(n*Sqrt(3))): n in [1..50]]; // G. C. Greubel, May 27 2018

Crossrefs

Cf. A022159.

Sequence in context: A256359 A287073 A022160 * A032717 A361300 A256360

Adjacent sequences: A022155 A022156 A022157 * A022159 A022160 A022161

Keyword

nonn

Author

Clark Kimberling

Extensions

More terms from Michel Marcus, Mar 05 2014

Status

approved