login
A094041
Beatty sequence for e^Pi - Pi^e - i^i.
1
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
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
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Apr 23 2004
STATUS
approved