login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A110986
Decimal expansion of Zeta(Zeta(3)).
0
5, 5, 4, 0, 8, 2, 9, 0, 2, 4, 0, 6, 8, 1, 6, 9, 3, 4, 5, 6, 0, 4, 2, 6, 1, 1, 0, 3, 1, 6, 2, 6, 6, 2, 2, 5, 5, 8, 4, 6, 1, 9, 7, 8, 8, 8, 9, 9, 1, 6, 6, 2, 5, 7, 3, 3, 1, 3, 1, 7, 5, 5, 8, 9, 3, 7, 2, 7, 5, 9, 7, 1, 8, 6, 9, 8, 5, 3, 1, 6, 6, 6, 3, 4, 6, 4, 4, 4, 7, 0, 5, 2, 2, 1, 0, 3, 4, 6, 2
OFFSET
1,1
FORMULA
Zeta(s) = Sum(1/n^s, n=1, 2, ..inf).
EXAMPLE
5.5408290...
MATHEMATICA
RealDigits[Zeta[Zeta[3]], 10, 120][[1]] (* Harvey P. Dale, Jan 21 2015 *)
PROG
(PARI) zeta2(v, n) = \ v = value, n=number of places { local(y, x, l, z1); z1=zeta(v); l=length(Str(floor(z1))); \ length of the integer part y=Vec(Str(z1)); for(x=1, l, \ to the left of decimal point print1(y[x]", "); ); for(x=l+2, n, print1(y[x]", ") \ to the right of the decimal point ) }
CROSSREFS
Sequence in context: A175505 A158274 A202695 * A193721 A377202 A019927
KEYWORD
easy,nonn,cons
AUTHOR
Cino Hilliard, Sep 30 2005
STATUS
approved