|
|
A004923
|
|
a(n) = floor(n*phi^8), where phi is the golden ratio, A001622.
|
|
19
|
|
|
0, 46, 93, 140, 187, 234, 281, 328, 375, 422, 469, 516, 563, 610, 657, 704, 751, 798, 845, 892, 939, 986, 1033, 1080, 1127, 1174, 1221, 1268, 1315, 1362, 1409, 1456, 1503, 1550, 1597, 1644, 1691, 1738, 1785
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{c=GoldenRatio^8}, Floor[c*Range[0, 40]]] (* Harvey P. Dale, Sep 08 2020 *)
|
|
PROG
|
(Magma) [Floor((47+21*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Aug 24 2023
(SageMath) [floor(golden_ratio^8*n) for n in range(61)] # G. C. Greubel, Aug 24 2023
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|