%I #23 May 11 2024 15:40:56
%S 23,46,69,92,115,138,161,185,208,231,254,277,300,323,347,370,393,416,
%T 439,462,485,509,532,555,578,601,624,647,671,694,717,740,763,786,809,
%U 833,856,879,902,925,948,971,995,1018,1041,1064
%N Beatty sequence for e^Pi.
%H Paolo Xausa, <a href="/A038152/b038152.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>
%F a(n) = floor(n*e^Pi).
%p A038152:=n->floor(n*exp(Pi)): seq(A038152(n), n=1..100); # _Wesley Ivan Hurt_, Jan 21 2017
%t Floor[Range[100]*E^Pi] (* _Paolo Xausa_, May 11 2024 *)
%o (PARI) a(n) = floor(n*exp(Pi)); \\ _Michel Marcus_, Sep 28 2013
%Y Cf. A000796, A001113, A039661.
%K nonn,easy
%O 1,1
%A _Felice Russo_
%E Corrected and extended by _Carlos Alves_, Nov 25 2006