A004938 a(n) = round(n*phi^3), where phi is the golden ratio, A001622.

0, 4, 8, 13, 17, 21, 25, 30, 34, 38, 42, 47, 51, 55, 59, 64, 68, 72, 76, 80, 85, 89, 93, 97, 102, 106, 110, 114, 119, 123, 127, 131, 136, 140, 144, 148, 152, 157, 161, 165, 169, 174, 178, 182, 186, 191, 195, 199

Offset

0,2

Comments

Nearest integer to n*phi^3.

Links

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

Mathematica

Round[GoldenRatio^3*Range[0, 80]] (* G. C. Greubel, Oct 17 2023 *)

Prog

(PARI) a(n) = round(n*(((sqrt(5)+1))/2)^3); \\ Michel Marcus, Aug 28 2016
(Magma) [Round((2+Sqrt(5))*n): n in [0..80]]; // G. C. Greubel, Oct 17 2023
(SageMath) [round(golden_ratio^3*n) for n in range(81)] # G. C. Greubel, Oct 17 2023

Crossrefs

Cf. A004937, A004939 - A004955.

Cf. A001622.

Sequence in context: A311815 A311816 A081843 * A299641 A311817 A311818

Adjacent sequences: A004935 A004936 A004937 * A004939 A004940 A004941

Keyword

nonn

Author

N. J. A. Sloane

Status

approved