login
A004925
a(n) = floor(n*phi^10), where phi is the golden ratio, A001622.
19
0, 122, 245, 368, 491, 614, 737, 860, 983, 1106, 1229, 1352, 1475, 1598, 1721, 1844, 1967, 2090, 2213, 2336, 2459, 2582, 2705, 2828, 2951, 3074, 3197, 3320, 3443, 3566, 3689, 3812, 3935, 4058, 4181
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
KEYWORD
nonn
STATUS
approved