OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..10000
MATHEMATICA
Round[Range[0, 100]GoldenRatio^4] (* Paolo Xausa, Oct 28 2023 *)
PROG
(Magma) [Round(n*(7+3*Sqrt(5))/2): n in [0..80]]; // G. C. Greubel, Dec 04 2023
(SageMath) [round(golden_ratio^4*n) for n in range(81)] # G. C. Greubel, Dec 04 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved