|
| |
|
|
A154819
|
|
a(n) = floor(zeta(zeta(...zeta(2)...))), where zeta appears n times; zeta is the Riemann Zeta function
|
|
1
| |
|
|
1, 2, 1, 2, 1, 3, 1, 10, 1, 1835, 1
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| a(n)=1 for odd n; a(12) (see the b-file) is too large to display here.
|
|
|
LINKS
| Vladimir Reshetnikov, Table of n, a(n) for n=1..12
|
|
|
EXAMPLE
| a(1) = floor(zeta(2)); a(2) = floor(zeta(zeta(2)));
|
|
|
MATHEMATICA
| Block[{$MaxExtraPrecision = Infinity}, Table[Floor[Nest[Zeta, 2, n]], {n, 1, 12}]]
|
|
|
CROSSREFS
| Sequence in context: A046206 A137753 A134780 * A104145 A123675 A123400
Adjacent sequences: A154816 A154817 A154818 * A154820 A154821 A154822
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Reshetnikov (v.reshetnikov(AT)gmail.com), Jan 15 2009
|
| |
|
|
