|
Search: id:A135325
|
|
|
| A135325 |
|
Smallest n such that pi(n)=Floor[n/log((n-pi(n))/e)]. |
|
+0
1
|
|
| 59473, 59671, 59699, 59707, 59729, 59743, 59747, 59755, 59771, 59779, 59791, 59799, 59810, 152993, 153001, 155801, 155809, 155821, 155833, 155849, 155853, 155877, 155889, 155913, 155925, 210533, 211891, 211933, 211943, 211949, 211969
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
MATHEMATICA
|
j=0; Do[k=Floor[n/Log[(n-PrimePi[n])/E]]; If[PrimePi[n]==k&&k>j, Print[n]; j=k], {n, 1, 10^7, 1}]
|
|
CROSSREFS
|
Cf. A057834, A058289, A000720.
Adjacent sequences: A135322 A135323 A135324 this_sequence A135326 A135327 A135328
Sequence in context: A017434 A017566 A104919 this_sequence A043635 A106774 A075671
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Manuel Valdivia (mvaldivia(AT)ugr.es), Dec 07 2007
|
|
|
Search completed in 0.002 seconds
|
