|
| |
|
|
A161961
|
|
Denominator of ratio in lowest terms of Pi(n^2)/(n*Pi(n)), where Pi(x) = A000720(x).
|
|
2
| |
|
|
1, 3, 4, 5, 18, 28, 16, 18, 8, 11, 30, 2, 21, 15, 16, 119, 21, 19, 80, 168, 44, 23, 72, 75, 117, 81, 252, 145, 150, 341, 88, 363, 374, 77, 66, 148, 2, 39, 480, 533, 273, 602, 616, 35, 644, 15, 40, 35, 750, 85, 260, 848, 864, 440, 896, 912, 464, 1003, 1020, 366, 279, 126, 96, 585
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,2
|
|
|
COMMENTS
| Conjecture: S(n) = Pi(n^2)/(n*Pi(n)) ~ 1/2. The sequence is highly oscillatory but for 51000<n<51000, the ratio is already between 0.46 and 0.48.
|
|
|
EXAMPLE
| The first few terms are: 1, 2/3, 3/4, 3/5, 11/18, 15/28, 9/16, 11/18, 5/8,...
|
|
|
MAPLE
| A000720 := proc(n) numtheory[pi](n) ; end:
A161961 := proc(n) A000720(n^2)/n/A000720(n) ; denom(%) ; end: seq(A161961(n), n=2..120) ; # R. J. Mathar, Oct 05 2009
|
|
|
MATHEMATICA
| Table[PrimePi[n^2]/(n*PrimePi[n]), {n, 1, 100}]
|
|
|
CROSSREFS
| Cf. A161960, A000720.
Sequence in context: A173061 A174326 A059184 * A161474 A084930 A114336
Adjacent sequences: A161958 A161959 A161960 * A161962 A161963 A161964
|
|
|
KEYWORD
| nonn,frac
|
|
|
AUTHOR
| Daniel Tisdale (daniel6874(AT)gmail.com), Jun 22 2009
|
|
|
EXTENSIONS
| Keyword:frac added by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Jun 30 2009
Definition corrected and sequence extended - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 05 2009
|
| |
|
|
