A038153 Beatty sequence for Pi^e.
22, 44, 67, 89, 112, 134, 157, 179, 202, 224, 247, 269, 291, 314, 336, 359, 381, 404, 426, 449, 471, 494, 516, 539, 561, 583, 606, 628, 651, 673, 696, 718, 741, 763, 786, 808, 830, 853, 875, 898, 920, 943, 965, 988, 1010, 1033, 1055, 1078, 1100, 1122, 1145
Offset: 1
Keywords
Links
- Karl V. Keller, Jr., Table of n, a(n) for n = 1..1000
- Index entries for sequences related to Beatty sequences
Crossrefs
Cf. A059850. - R. J. Mathar, Oct 10 2010
Programs
-
Maple
A038153 := proc(n) floor(n*Pi^exp(1)) ; end proc: seq(A038153(n),n=1..80) ; # R. J. Mathar, Oct 10 2010
-
Mathematica
Floor[Range[100]*Pi^E] (* Paolo Xausa, Jul 05 2024 *)
Formula
a(n) = floor(n * 22.4591577...).
Extensions
Extended by R. J. Mathar, Oct 10 2010