|
|
A212463
|
|
a(n) = ceiling( Pi^(n/3) ).
|
|
2
|
|
|
2, 3, 4, 5, 7, 10, 15, 22, 32, 46, 67, 98, 143, 209, 307, 449, 657, 962, 1409, 2063, 3021, 4424, 6479, 9489, 13897, 20354, 29810, 43659, 63942, 93649, 137157, 200878, 294205, 430889, 631077, 924270, 1353678
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a[n_]:= Ceiling[((Pi)^(n/3))]; Table[a[n], {n, 1, 50}] (* Vincenzo Librandi, Feb 14 2013 *)
|
|
PROG
|
(Derive) PROG(y := [], n := 60, LOOP(IF(n = 0, RETURN y), y := ADJOIN(CEILING((pi)^(n/3)), y), n := n - 1))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|