|
|
A004935
|
|
a(n) = floor(n*phi^20), where phi is the golden ratio, A001622.
|
|
19
|
|
|
0, 15126, 30253, 45380, 60507, 75634, 90761, 105888, 121015, 136142, 151269, 166396, 181523, 196650, 211777, 226904, 242031, 257158, 272285, 287412, 302539, 317666, 332793, 347920, 363047, 378174
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
phi^20 = 15126.999933893... is a near integer.
Therefore the (incorrect!) g.f. 1 + (-1 + 15128*x)/(1-x)^2 produces the initial about 15000 terms of this sequence.
(End)
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{c=GoldenRatio^20}, Floor[c Range[0, 30]]] (* Harvey P. Dale, Feb 18 2013 *)
|
|
PROG
|
(Magma) [Floor((15127+6765*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Sep 12 2023
(SageMath) [floor(golden_ratio^(20)*n) for n in range(61)] # G. C. Greubel, Sep 12 2023
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|