A004931 a(n) = floor(n*phi^16), where phi is the golden ratio, A001622.

0, 2206, 4413, 6620, 8827, 11034, 13241, 15448, 17655, 19862, 22069, 24276, 26483, 28690, 30897, 33104, 35311, 37518, 39725, 41932, 44139, 46346, 48553, 50760, 52967, 55174, 57381, 59588, 61795

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..10000

Mathematica

Floor[GoldenRatio^(16)*Range[0, 60]] (* G. C. Greubel, Sep 06 2023 *)

Prog

(Magma) [Floor((2207+987*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Sep 06 2023
(SageMath) [floor(golden_ratio^(16)*n) for n in range(61)] # G. C. Greubel, Sep 06 2023

Crossrefs

Cf. A004919, A004920, A004921, A004922, A004923, A004924, A004925.

Cf. A004926, A004927, A004928, A004929, A004930, A004932, A004933.

Cf. A004934, A004935, A004976, A066096, A090909.

Cf. A001622.

Sequence in context: A252392 A175915 A098192 * A004951 A004971 A037210

Adjacent sequences: A004928 A004929 A004930 * A004932 A004933 A004934

Keyword

nonn

Author

N. J. A. Sloane

Status

approved