login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A087723 Values that appear more than once in A087724 (related to the growth of PrimePi). 1
1, 2, 7, 11, 12, 13, 15, 19, 26, 29, 33, 35, 41, 48, 54, 71, 72, 76, 84, 86, 90, 92, 93, 96, 98, 103, 105, 108, 117, 122, 127, 129, 130, 137, 142, 152, 157, 158, 165, 176, 180, 183, 191, 193, 194, 196, 213, 214, 218, 219, 229, 231, 233, 234, 235, 246, 250, 256, 267 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Table of n, a(n) for n=1..59.

MATHEMATICA

Digits=1000 a[n_]=-PrimePi[n]+Floor[Prime[n]/Log[n]]-2 b=Table[a[n], {n, 2, Digits}] c=Table[If[b[[n]]-b[[n-1]]==0, b[[n]], 0], {n, 2, Digits-1}] d=Delete[Union[c], 1]

CROSSREFS

Sequence in context: A053247 A226089 A208846 * A299242 A184792 A136998

Adjacent sequences:  A087720 A087721 A087722 * A087724 A087725 A087726

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Sep 29 2003

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 14 14:21 EDT 2021. Contains 345025 sequences. (Running on oeis4.)