A054386 Beatty sequence for Pi/(Pi-1); complement of A022844.
1, 2, 4, 5, 7, 8, 10, 11, 13, 14, 16, 17, 19, 20, 22, 23, 24, 26, 27, 29, 30, 32, 33, 35, 36, 38, 39, 41, 42, 44, 45, 46, 48, 49, 51, 52, 54, 55, 57, 58, 60, 61, 63, 64, 66, 67, 68, 70, 71, 73, 74, 76, 77, 79, 80, 82, 83, 85, 86, 88, 89, 90, 92, 93, 95, 96, 98, 99, 101, 102
Offset: 1
Keywords
Links
- Martin Fuller, Table of n, a(n) for n = 1..1000
- Eric Weisstein's World of Mathematics, Beatty Sequence.
- Index entries for sequences related to Beatty sequences
Programs
-
Magma
R:=RealField(30); [Floor(n*Pi(R)/(Pi(R)-1)): n in [1..80]]; // G. C. Greubel, Oct 22 2023
-
Mathematica
Floor[Pi*Range[80]/(Pi-1)] (* G. C. Greubel, Oct 22 2023 *)
-
SageMath
[floor(n*pi/(pi-1)) for n in range(1,81)] # G. C. Greubel, Oct 22 2023
Comments