A038152 Beatty sequence for e^Pi.

23, 46, 69, 92, 115, 138, 161, 185, 208, 231, 254, 277, 300, 323, 347, 370, 393, 416, 439, 462, 485, 509, 532, 555, 578, 601, 624, 647, 671, 694, 717, 740, 763, 786, 809, 833, 856, 879, 902, 925, 948, 971, 995, 1018, 1041, 1064

Offset: 1

Author

Felice Russo

Keywords

• nonn
• easy

Links

• Paolo Xausa, Table of n, a(n) for n = 1..10000
• Index entries for sequences related to Beatty sequences

Crossrefs

Cf. A000796, A001113, A039661.

Programs

Maple

A038152:=n->floor(n*exp(Pi)): seq(A038152(n), n=1..100); # Wesley Ivan Hurt, Jan 21 2017

Mathematica

Floor[Range[100]*E^Pi] (* Paolo Xausa, May 11 2024 *)

PARI

a(n) = floor(n*exp(Pi)); \\ Michel Marcus, Sep 28 2013

Formula

a(n) = floor(n*e^Pi).

Extensions

Corrected and extended by Carlos Alves, Nov 25 2006