A094390 A Beatty sequence using exp(Pi/4).

2, 4, 6, 8, 10, 13, 15, 17, 19, 21, 24, 26, 28, 30, 32, 35, 37, 39, 41, 43, 46, 48, 50, 52, 54, 57, 59, 61, 63, 65, 67, 70, 72, 74, 76, 78, 81, 83, 85, 87, 89, 92, 94, 96, 98, 100, 103, 105, 107, 109, 111, 114, 116, 118, 120, 122, 125, 127, 129, 131, 133, 135, 138, 140

Offset

1,1

Comments

Beatty complement is A094391.

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Formula

a(n) = floor(n * exp(Pi/4)).

Mathematica

c = E^(Pi/4); Table[Floor[n*c], {n, 65}]

Prog

(Magma)
R:= RealField(100);
[Floor(n*Exp(Pi(R)/4)): n in [1..100]]; // G. C. Greubel, Sep 27 2024
(SageMath)
[int(n*exp(pi/4)) for n in range(1, 101)] # G. C. Greubel, Sep 27 2024

Crossrefs

Cf. A094391.

Sequence in context: A329828 A172278 A276383 * A186289 A332687 A345981

Adjacent sequences: A094387 A094388 A094389 * A094391 A094392 A094393

Keyword

nonn

Author

Robert G. Wilson v, Apr 28 2004

Status

approved