login
Beatty sequence for 1/(e^Pi - Pi^e), complement of A127451.
3

%I #17 Jul 09 2021 01:39:28

%S 1,2,4,5,7,8,10,11,13,14,16,17,19,20,22,23,24,26,27,29,30,32,33,35,36,

%T 38,39,41,42,44,45,46,48,49,51,52,54,55,57,58,60,61,63,64,66,67,68,70,

%U 71,73,74,76,77,79,80,82,83,85,86,88,89,90,92,93,95,96,98,99,101,102

%N Beatty sequence for 1/(e^Pi - Pi^e), complement of A127451.

%C Differs from A054386 at term n=122, where A054386(122)=178, A127450(122)=179. - _Martin Fuller_, May 10 2007

%H Martin Fuller, <a href="/A127450/b127450.txt">Table of n, a(n) for n = 1..1000</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/BeattySequence.html">Beatty Sequence</a>.

%H <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>

%F a(n) = floor(n/(e^Pi - Pi^e))

%t Table[Floor[n/(Exp[Pi] - Pi^E)], {n, 70}]

%Y Cf. A063504, A054386, A059564.

%K easy,nonn

%O 1,2

%A _Robert G. Wilson v_, Jan 14 2007

%E Definition corrected by _N. J. A. Sloane_, May 10 2007