A124507 a(n) = floor(exp(n*Pi/2)).

1, 4, 23, 111, 535, 2575, 12391, 59609, 286751, 1379410, 6635623, 31920519, 153552935, 738662922, 3553321280, 17093171648, 82226315585, 395547831244, 1902773895292, 9153250784394, 44031505860632, 211812562992413, 1018919543279304, 4901489415968642

Offset

0,2

References

Roger Penrose, The Road to Reality, (2005), p. 88 (figure 5.3).

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Maple

Digits:= 2000:
a:= n-> floor(exp(n*Pi/2)):
seq(a(n), n=0..30);  # Alois P. Heinz, Nov 25 2018

Mathematica

Table[ Floor@ Exp[n*Pi/2], {n, 0, 21}] (* Robert G. Wilson v, Dec 31 2006 *)

Prog

(PARI) vector(30, n, n--; floor(exp(n*Pi/2))) \\ G. C. Greubel, Nov 25 2018
(Magma) R:= RealField(10); [Floor(Exp(n*Pi(R)/2)): n in [0..30]]; // G. C. Greubel, Nov 25 2018
(SageMath) [floor(exp(n*pi/2)) for n in range(30)] # G. C. Greubel, Nov 25 2018

Crossrefs

Cf. A062360 (even bisection), A042972.

Sequence in context: A197868 A017973 A306669 * A392407 A239813 A174248

Adjacent sequences: A124504 A124505 A124506 * A124508 A124509 A124510

Keyword

nonn

Author

Zacariaz Martinez, Dec 27 2006

Extensions

Edited and extended by Robert G. Wilson v, Dec 31 2006

Comments edited by Jon E. Schoenfield, Nov 25 2018

Status

approved