OFFSET
1,42
COMMENTS
Conjecture: a(n) > 0 for all n > 1234.
See also part (ii) of the conjecture in A235343.
We have verified the conjecture for n up to 100000.
LINKS
Zhi-Wei Sun, Table of n, a(n) for n = 1..10000
EXAMPLE
a(50) = 1 since phi(10) + phi(40)/4 = 6 with 6 - 1, 6 + 1 and q(6) - 1 = 3 all prime.
MATHEMATICA
f[n_, k_]:=EulerPhi[k]+EulerPhi[n-k]/8
p[n_, k_]:=PrimeQ[f[n, k]-1]&&PrimeQ[f[n, k]+1]&&PrimeQ[PartitionsQ[f[n, k]]-1]
a[n_]:=Sum[If[p[n, k], 1, 0], {k, 1, n-1}]
Table[a[n], {n, 1, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhi-Wei Sun, Jan 07 2014
STATUS
approved