OFFSET
0,2
MAPLE
A004925:=n->floor(n*((1 + sqrt(5))/2)^10): seq(A004925(n), n=0..100); # Wesley Ivan Hurt, Jul 26 2017
MATHEMATICA
Floor[GoldenRatio^(10)*Range[0, 60]] (* G. C. Greubel, Aug 27 2023 *)
PROG
(Magma) [Floor((123+55*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Aug 27 2023
(SageMath) [floor(golden_ratio^(10)*n) for n in range(61)] # G. C. Greubel, Aug 27 2023
CROSSREFS
Cf. A001622 (phi).
KEYWORD
nonn
AUTHOR
STATUS
approved