A161960 Numerators to accompany A161961.
1, 2, 3, 3, 11, 15, 9, 11, 5, 6, 17, 1, 11, 8, 9, 61, 11, 9, 39, 85, 23, 11, 35, 38, 61, 43, 137, 73, 77, 162, 43, 181, 191, 40, 35, 73, 1, 20, 251, 263, 137, 283, 295, 17, 319, 7, 19, 17, 367, 42, 131, 409, 421, 217, 445, 457, 237, 487, 503, 173, 133, 61, 47, 289, 1, 609, 156
Offset: 2
Crossrefs
Cf. A161961.
Programs
-
Mathematica
Table[PrimePi[n^2]/(n*PrimePi[n]),{n,1,100}]
Extensions
More terms from R. J. Mathar, Oct 05 2009