A004929 a(n) = floor(n*phi^14), where phi is the golden ratio, A001622.
0, 842, 1685, 2528, 3371, 4214, 5057, 5900, 6743, 7586, 8429, 9272, 10115, 10958, 11801, 12644, 13487, 14330, 15173, 16016, 16859, 17702, 18545, 19388, 20231, 21074, 21917, 22760, 23603, 24446
Offset: 0
Keywords
Links
Crossrefs
Programs
-
Magma
[Floor((843+377*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Sep 05 2023
-
Mathematica
Floor[GoldenRatio^(14)*Range[0, 60]] (* G. C. Greubel, Sep 05 2023 *)
-
SageMath
[floor(golden_ratio^(14)*n) for n in range(61)] # G. C. Greubel, Sep 05 2023