login
A083617
Starting positions of strings of five 4's in the decimal expansion of Pi.
2
808650, 828499, 828500, 1159493, 1160895, 1218361, 1264270, 1264271, 1290645, 1364846, 1378434, 1394738, 1660588, 1691163, 1691164, 1780532, 2006297, 2038552, 2202740, 2341312, 2502895, 2558106, 2562163, 2932009, 3017406
OFFSET
1,1
MATHEMATICA
$MaxPrecision=Infinity; Transpose[StringPosition[StringDrop[ToString[N[Pi, 10! ]], 2], "44444"]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
CROSSREFS
Cf. A083616 (four 4's), A083618 (six 4's).
Sequence in context: A186585 A270117 A178290 * A343082 A344239 A344240
KEYWORD
base,nonn
AUTHOR
Rick L. Shepherd, May 02 2003
STATUS
approved