OFFSET
1,1
LINKS
Michel Lagneau, Table of n, a(n) for n = 1..5000
EXAMPLE
5 is a member because we have:
prime(5 + 3) + prime(5 - 3) = 19 + 3 = 22;
prime(5 + 2) + prime(5 - 2) = 17 + 5 = 22.
10 is a member because we have:
prime(10 + 2) + prime(10 - 2) = 19 + 37 = 56;
prime(10 + 3) + prime(10 - 3) = 17 + 41 = 58;
prime(10 + 4) + prime(10 - 4) = 13 + 43 = 56;
prime(10 + 5) + prime(10 - 5) = 11 + 47 = 58;
prime(10 + 7) + prime(10 - 7) = 5 + 59 = 64;
prime(10 + 8) + prime(10 - 8) = 3 + 61 = 64;
and all the sums 56, 58 and 64 appear twice.
MAPLE
for n from 1 to 200 do:
lst:={}:W:=array(1..n-1):cr:=0:
for m from n-1 by -1 to 1 do:
q:=ithprime(n-m)+ithprime(n+m):lst:=lst union {q}:W[m]:=q:cr:=cr+1:
od:c:=0:
for k from 1 to cr do:
if W[k]=2*ithprime(n) then c:=c+1:
else fi:
od:
if c>1 then
printf(`%d, `, n):
else fi:
od :
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Feb 19 2016
STATUS
approved