%I #17 Jul 05 2024 07:00:59
%S 22,44,67,89,112,134,157,179,202,224,247,269,291,314,336,359,381,404,
%T 426,449,471,494,516,539,561,583,606,628,651,673,696,718,741,763,786,
%U 808,830,853,875,898,920,943,965,988,1010,1033,1055,1078,1100,1122,1145
%N Beatty sequence for Pi^e.
%H Karl V. Keller, Jr., <a href="/A038153/b038153.txt">Table of n, a(n) for n = 1..1000</a>
%H <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>
%F a(n) = floor(n * 22.4591577...).
%p A038153 := proc(n) floor(n*Pi^exp(1)) ; end proc: seq(A038153(n),n=1..80) ; # _R. J. Mathar_, Oct 10 2010
%t Floor[Range[100]*Pi^E] (* _Paolo Xausa_, Jul 05 2024 *)
%Y Cf. A059850. - _R. J. Mathar_, Oct 10 2010
%K nonn
%O 1,1
%A _Felice Russo_
%E Extended by _R. J. Mathar_, Oct 10 2010