|
Search: id:A102878
|
|
|
| A102878 |
|
Increasing partial quotients in the continued fraction expansion of the prime constant (A051006). |
|
+0
4
|
|
| 0, 2, 3, 12, 131, 169, 199, 279, 413, 851, 2771, 18514, 20740, 20780, 147756, 207783, 312134, 361393, 6931243
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
a(19) is a 3010301 digit number (1.71206300894551448591713167863057582188628436436...*10^3010300) with digital distribution of 301276, 301983, 300946, 301660, 301631, 301181, 299864, 300633, 300456 & 300671.
a(19) is a 3010301-digit number (1.71206300894551448591713167863057582188628436436...*10^3010300) with digit distribution 301276, 301983, 300946, 301660, 301631, 301181, 299864, 300633, 300456 & 300671.
|
|
MATHEMATICA
|
cf = ContinuedFraction[ FromDigits[ {{Table[ If[ PrimeQ[n], 1, 0], {n, 10^7}]}, 0}, 2]]; a = 0; Do[ If[ cf[[n]] > a, a = cf[[n]]; Print[a]], {n, 5842783}]
|
|
CROSSREFS
|
Cf. A051006, A051007, A103518.
Sequence in context: A088223 A162053 A162075 this_sequence A132501 A067338 A012713
Adjacent sequences: A102875 A102876 A102877 this_sequence A102879 A102880 A102881
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 15 2005
|
|
|
Search completed in 0.002 seconds
|
