A179492 a(n) = floor((1 + 1/Pi)^n).

1, 1, 2, 3, 3, 5, 6, 9, 12, 15, 20, 27, 36, 47, 63, 83, 109, 144, 190, 251, 331, 436, 575, 759, 1001, 1319, 1739, 2293, 3023, 3985, 5254, 6927, 9132, 12039, 15871, 20923, 27583, 36363, 47938, 63197, 83313, 109833, 144794, 190884, 251644, 331745

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 16 2010

Keywords

• nonn

Crossrefs

Cf. A002379 (with 2 instead of Pi), A064628 (with 3 instead of Pi).

Programs

Maple

Digits := 100 ; A179492 := proc(n) (1+1/Pi)^n ; floor(%) ; end proc: seq(A179492(n),n=1..80) ; # R. J. Mathar, Jul 20 2010

Mathematica

a=1; Table[Floor[a+=a/Pi],{n,0,22}]

Formula

a(n) = floor( (1+1/Pi)^n ). - R. J. Mathar, Jul 20 2010

Extensions

More terms from R. J. Mathar, Jul 20 2010