

A111197


Decimal expansion of (Pi!)! = gamma(gamma(Pi+1)+1).


1



7, 3, 8, 0, 5, 5, 5, 5, 5, 7, 6, 0, 3, 1, 0, 3, 8, 7, 1, 5, 0, 5, 7, 7, 5, 1, 2, 2, 7, 5, 9, 9, 4, 7, 1, 1, 2, 4, 8, 9, 2, 6, 5, 7, 4, 1, 1, 3, 0, 7, 7, 1, 7, 7, 7, 7, 7, 3, 6, 5, 0, 8, 7, 8, 8, 7, 7, 1, 5, 4, 3, 5, 8, 5, 0, 7, 4, 8, 7, 1, 5, 3, 7, 9, 4, 4, 8, 0, 3, 2, 2, 7, 8, 5, 7, 2, 1, 9, 2, 2, 1, 6, 3, 6, 7
(list;
constant;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

4,1


COMMENTS

Continued fraction is [7380, 1, 1, 3, 1, 6028, 1, 2, 1, 1, 14, 1, 20, 5, 3, 1, 3, 1, 1, 1, 3, 1,...]. 9(Pi!)! = 66425.000018427934843551976104839524..., the continued fraction of which is [66425, 54265, 2, 3, 1, 2, 3, 1, 1, 1, 1, 2, 1, 3, 5, 2, 2, 8, 1, 4, 2, 1,...].  Gerald McGarvey, Oct 23 2005


LINKS

Table of n, a(n) for n=4..108.


EXAMPLE

7380.55555760310387150577512275994711248926574113077177777365087887...


MATHEMATICA

RealDigits[(Pi!)!, 10, 111][[1]] (* Robert G. Wilson v, Oct 24 2005 *)


PROG

(PARI) \p 100
x=gamma(gamma(Pi+1)+1); y=x/10^ceil(log(x)/log(10)) for(n=1, 100, z=y*10; w=floor(z); print1(w, ", "); y=zw)


CROSSREFS

Cf. A000796.
Sequence in context: A346538 A166201 A248281 * A245645 A335994 A115411
Adjacent sequences: A111194 A111195 A111196 * A111198 A111199 A111200


KEYWORD

cons,nonn


AUTHOR

Gerald McGarvey, Oct 23 2005


EXTENSIONS

More terms from Gerald McGarvey, Oct 23 2005


STATUS

approved



