The OEIS is supported by the many generous donors to the OEIS Foundation.

 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 59th year, we have over 358,000 sequences, and we’ve crossed 10,300 citations (which often say “discovered thanks to the OEIS”). Other ways to Give
 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A053013 Positions in decimal expansion of Pi where next prime begins. 6
 1, 2, 7, 8, 11, 12, 14, 15, 19, 3076, 3077, 3078, 3081, 3082, 3083, 3831, 3833, 3835, 3836, 3838, 3921, 3926, 3927, 3929, 4000, 4010, 4011, 4012, 4014, 4016, 4018, 4019, 4020, 4023, 4024, 4038, 4040, 4045, 4096, 4097, 4103, 4104, 4110, 4113, 4115, 4124 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS This sequence refers to a variant of A047777 in which one does not require that all primes are distinct. See A229181 for first differences of this sequence. - M. F. Hasler, Sep 15 2013 LINKS FORMULA Partial sums of A229181: a(n)=sum_{k=1...n} A229181(k). - M. F. Hasler, Sep 15 2013 MATHEMATICA A229181 = {1}; digits = Join[{{1}}, RealDigits[Pi, 10, 5000] // First // Rest]; digits //. {a:({_Integer..}..), b__Integer /; PrimeQ[FromDigits[{b}]], c___Integer} :> (Print[lg = {b} // Length]; AppendTo[A229181, lg]; {{1}, c}) ; Join[{1}, Accumulate[A229181] + 1] (* Jean-François Alcover, Oct 17 2013 *) CROSSREFS Sequence in context: A005538 A329648 A206331 * A070044 A129850 A037073 Adjacent sequences: A053010 A053011 A053012 * A053014 A053015 A053016 KEYWORD nonn,base AUTHOR Mark R. Diamond, Feb 22 2000 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 9 23:05 EST 2022. Contains 358710 sequences. (Running on oeis4.)