A108589 a(n) = floor(n*Pi/(Pi-2)).
2, 5, 8, 11, 13, 16, 19, 22, 24, 27, 30, 33, 35, 38, 41, 44, 46, 49, 52, 55, 57, 60, 63, 66, 68, 71, 74, 77, 79, 82, 85, 88, 90, 93, 96, 99, 101, 104, 107, 110, 112, 115, 118, 121, 123, 126, 129, 132, 134, 137, 140, 143, 145, 148, 151, 154, 156, 159, 162, 165, 167
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..7000
- Eric Weisstein's World of Mathematics, Beatty Sequence
- Index entries for sequences related to Beatty sequences
Programs
-
Magma
R:= RealField(40); [Floor(n*Pi(R)/(Pi(R)-2)): n in [1..60]]; // G. C. Greubel, Oct 21 2023
-
Maple
A108589:=n->floor(n*Pi/(Pi-2)); seq(A108589(n), n=1..50); # Wesley Ivan Hurt, Apr 19 2014
-
Mathematica
With[{c=Pi/(Pi-2)},Floor[c*Range[70]]] (* Harvey P. Dale, Apr 19 2014 *)
-
SageMath
[floor(n*pi/(pi-2)) for n in range(1,61)] # G. C. Greubel, Oct 21 2023
Comments