A094041 Beatty sequence for e^Pi - Pi^e - i^i.

2, 4, 6, 8, 10, 12, 14, 16, 19, 21, 23, 25, 27, 29, 31, 33, 35, 38, 40, 42, 44, 46, 48, 50, 52, 54, 57, 59, 61, 63, 65, 67, 69, 71, 73, 76, 78, 80, 82, 84, 86, 88, 90, 92, 95, 97, 99, 101, 103, 105, 107, 109, 111, 114, 116, 118, 120, 122, 124, 126, 128, 130, 133, 135, 137

Offset

1,1

Links

Table of n, a(n) for n=1..65.

Mathematica

a = 1/Chop[ N[E^Pi - Pi^E - I^I, 256]]; b = a/(a - 1); Table[ Floor[n*a], {n, 65}]

Crossrefs

Cf. A094042.

Sequence in context: A169919 A292512 A248195 * A058066 A249124 A322405

Adjacent sequences: A094038 A094039 A094040 * A094042 A094043 A094044

Keyword

nonn

Author

Robert G. Wilson v, Apr 23 2004

Status

approved