A004935 a(n) = floor(n*phi^20), where phi is the golden ratio, A001622.

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

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• easy

Comments

From Joerg Arndt, Sep 12 2023: (Start)

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

• G. C. Greubel, Table of n, a(n) for n = 0..10000
• Index entries for sequences related to Beatty sequences

Crossrefs

Cf. A004919, A004920, A004921, A004922, A004923, A004924, A004925.

Cf. A004926, A004927, A004928, A004929, A004930, A004931, A004932.

Cf. A004933, A004934, A004976, A066096, A090909.

Cf. A001622.

Programs

Magma

[Floor((15127+6765*Sqrt(5))*n/2): n in [0..60]]; // G. C. Greubel, Sep 12 2023

Mathematica

With[{c=GoldenRatio^20},Floor[c Range[0,30]]] (* Harvey P. Dale, Feb 18 2013 *)

SageMath

[floor(golden_ratio^(20)*n) for n in range(61)] # G. C. Greubel, Sep 12 2023