Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A145024 Number of primes between successive balanced primes (A006562). 1
3, 13, 21, 3, 7, 8, 1, 18, 29, 5, 3, 8, 11, 31, 4, 20, 3, 7, 5, 19, 21, 32, 1, 19, 48, 19, 29, 32, 7, 38, 1, 43, 12, 33, 46, 6, 16, 8, 4, 34, 15, 1, 19, 7, 1, 23, 28, 30, 22, 8, 1, 7, 1, 52, 14, 56, 10, 26, 2, 30, 65, 5, 71, 12, 44, 39, 37, 6, 19, 47, 11, 10, 21, 7, 11, 4, 62, 7, 4, 8, 1 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
MATHEMATICA
BalancedPrimeQ[n_]:=Prime[n+1]-Prime[n]==Prime[n]-Prime[n-1]; lst={}; a=1; Do[If[BalancedPrimeQ[n], i=PrimePi[p=Prime[n]]-PrimePi[a]; AppendTo[lst, i]; a=p], {n, 2, 5000}]; lst
CROSSREFS
Sequence in context: A215567 A214519 A099502 * A055059 A050903 A117766
KEYWORD
nonn
AUTHOR
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 18 22:11 EDT 2024. Contains 375284 sequences. (Running on oeis4.)