A061675 a(n) = floor(Pi^n + e^n).
2, 5, 17, 51, 152, 454, 1364, 4116, 12469, 37912, 115674, 354078, 1087023, 3346090, 10324775, 31927163, 98918331, 306999516, 954242372, 2970046250, 9255121991, 28870447577, 90140917038, 281668510339, 880762642043, 2755784313655, 8627071301305, 27019889359705
Offset: 0
Links
- Harry J. Smith, Table of n, a(n) for n = 0..200
Programs
-
Mathematica
Array[Floor[Pi^# + E^#] &, 23, 0] (* Michael De Vlieger, Jul 01 2018 *)
-
PARI
for(n=0,22,print(floor(Pi^n+exp(1)^n)))
-
PARI
{ default(realprecision, 100); e=exp(1); for (n=0, 200, write("b061675.txt", n, " ", floor(Pi^n + e^n)) ) } \\ Harry J. Smith, Jul 26 2009