[go: up one dir, main page]

login
A004933
a(n) = floor(n*phi^18), where phi is the golden ratio, A001622.
19
0, 5777, 11555, 17333, 23111, 28889, 34667, 40445, 46223, 52001, 57779, 63557, 69335, 75113, 80891, 86669, 92447, 98225, 104003, 109781, 115559, 121337, 127115, 132893, 138671, 144449, 150227
OFFSET
0,2
LINKS
MATHEMATICA
With[{p=GoldenRatio^18}, Floor[p*Range[0, 30]]] (* Harvey P. Dale, Mar 06 2022 *)
PROG
(Magma) [Floor((2889+1292*Sqrt(5))*n): n in [0..60]]; // G. C. Greubel, Sep 11 2023
(SageMath) [floor(golden_ratio^(18)*n) for n in range(61)] # G. C. Greubel, Sep 11 2023
KEYWORD
nonn,easy
STATUS
approved