A004940 a(n) = round(n*phi^5), where phi is the golden ratio, A001622.
0, 11, 22, 33, 44, 55, 67, 78, 89, 100, 111, 122, 133, 144, 155, 166, 177, 189, 200, 211, 222, 233, 244, 255, 266, 277, 288, 299, 311, 322, 333, 344, 355, 366, 377, 388, 399, 410, 421, 433, 444, 455, 466, 477
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..10000
Programs
-
Magma
[Round(n*(11+5*Sqrt(5))/2): n in [0..80]]; // G. C. Greubel, Dec 04 2023
-
Mathematica
With[{c=GoldenRatio^5},Round[c*Range[0,50]]] (* Harvey P. Dale, Nov 28 2021 *)
-
SageMath
[round(golden_ratio^5*n) for n in range(81)] # G. C. Greubel, Dec 04 2023