login
Beatty sequence for e^Pi - Pi^e - i^i.
1

%I #2 Mar 30 2012 17:31:00

%S 2,4,6,8,10,12,14,16,19,21,23,25,27,29,31,33,35,38,40,42,44,46,48,50,

%T 52,54,57,59,61,63,65,67,69,71,73,76,78,80,82,84,86,88,90,92,95,97,99,

%U 101,103,105,107,109,111,114,116,118,120,122,124,126,128,130,133,135,137

%N Beatty sequence for e^Pi - Pi^e - i^i.

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

%Y Cf. A094042.

%K nonn

%O 1,1

%A _Robert G. Wilson v_, Apr 23 2004