|
|
A124507
|
|
a(n) = floor(exp(n*Pi/2)).
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
REFERENCES
|
Roger Penrose, The Road to Reality, (2005), p. 88 (figure 5.3).
|
|
LINKS
|
|
|
MAPLE
|
Digits:= 2000:
a:= n-> floor(exp(n*Pi/2)):
|
|
MATHEMATICA
|
|
|
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
(Sage) [floor(exp(n*pi/2)) for n in range(30)] # G. C. Greubel, Nov 25 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|