|
|
A004928
|
|
a(n) = floor(n*phi^13), where phi is the golden ratio, A001622.
|
|
20
|
|
|
0, 521, 1042, 1563, 2084, 2605, 3126, 3647, 4168, 4689, 5210, 5731, 6252, 6773, 7294, 7815, 8336, 8857, 9378, 9899, 10420, 10941, 11462, 11983, 12504, 13025, 13546, 14067, 14588, 15109, 15630, 16151
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Floor[GoldenRatio^(13)*Range[0, 60]] (* G. C. Greubel, Sep 05 2023 *)
|
|
PROG
|
(Magma) [Floor((521+233*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Sep 05 2023
(SageMath) [floor(golden_ratio^(13)*n) for n in range(61)] # G. C. Greubel, Sep 05 2023
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|