OFFSET
1,3
COMMENTS
According to the conjecture in A237598, we should always have 0 < a(n) < prime(n).
LINKS
Zhi-Wei Sun, Table of n, a(n) for n = 1..10000
Z.-W. Sun, Problems on combinatorial properties of primes, arXiv:1402.6641, 2014
EXAMPLE
MATHEMATICA
sq[n_]:=IntegerQ[Sqrt[PrimePi[n]]]
Do[Do[If[sq[k*n], Print[n, " ", k]; Goto[aa]], {k, 1, Prime[n]-1}];
Print[n, " ", 0]; Label[aa]; Continue, {n, 1, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhi-Wei Sun, Feb 10 2014
STATUS
approved