The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A053013 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A053013

Positions in decimal expansion of Pi where next prime begins.
(history; published version)

#11 by Michel Marcus at Sun Apr 20 03:23:27 EDT 2014

STATUS

proposed

approved

#10 by Jon E. Schoenfield at Sun Apr 20 03:18:46 EDT 2014

STATUS

editing

proposed

#9 by Jon E. Schoenfield at Sun Apr 20 03:18:43 EDT 2014

AUTHOR

_Mark R. Diamond (markd(AT)psy.uwa.edu.au), _, Feb 22, 2000

STATUS

approved

editing

#8 by Bruno Berselli at Thu Oct 17 08:08:12 EDT 2013

STATUS

proposed

approved

#7 by Jean-François Alcover at Thu Oct 17 03:23:22 EDT 2013

STATUS

editing

proposed

#6 by Jean-François Alcover at Thu Oct 17 03:23:08 EDT 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 *)

STATUS

approved

editing

#5 by T. D. Noe at Wed Sep 18 20:21:52 EDT 2013

STATUS

proposed

approved

#4 by M. F. Hasler at Sun Sep 15 14:20:32 EDT 2013

STATUS

editing

proposed

#3 by M. F. Hasler at Sun Sep 15 14:20:11 EDT 2013

NAME

Positions in decimal expansion of Pi where next prime begins (see A047777).

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

FORMULA

Partial sums of A229181: a(n)=sum_{k=1...n} A229181(k). - M. F. Hasler, Sep 15 2013

AUTHOR

Mark R. Diamond (markd(AT)psy.uwa.edu.au)) , Feb 22, 2000

STATUS

approved

editing

#2 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003

KEYWORD

nonn,base,new

AUTHOR

Mark R. Diamond (markd@(AT)psy.uwa.edu.au)) Feb 22, 2000