OFFSET
1,9
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
n=27: gcd(2+3,27)=1, gcd(3+5,27)=1, gcd(5+7,27)=3, gcd(7+11,27)=9, gcd(11+13,27)=3, hence a(27)=2.
MAPLE
f:= proc(n) local t, p, q, s;
p:= 2; t:= 0;
do
q:= p; p:= nextprime(p);
s:= q+p;
if s > n then return t fi;
if igcd(s, n) = 1 then t:= t+1 fi
od
end proc:
map(f, [$1..100]); # Robert Israel, Dec 08 2024
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Reinhard Zumkeller, Oct 14 2002
STATUS
approved