OFFSET
1,2
EXAMPLE
70 + 69 = 139 is prime ;
70 + 57 = 127 is prime ;
70 + 9 = 79 is prime ;
70 + 3 = 73 is prime ;
70 + 1 = 71 is prime.
MAPLE
with(numtheory):nn:=50: T:=array(1..nn): T[1]:=1:T[2]:=2:a:=2:a0:=1:a1:=1:for
k from 3 to nn do:id:=0:for n from k to 20000 while(id=0) do:n1:=irem(n, 2):i:=0:for
p from 1 to a do: if n=T[p] then i:=0:else fi: x:=n+T[p]:if type(x, prime)=true
then i:=i+1:else fi:od: if (i=a1 and n1=0) or (i=a0 and n1=1) then T[k]:=n:a0:=a0+irem(n1+1, 2):a1:=a1+n1:printf(`%d, `, n):a:=a+1:id:=1: else fi:od:od:
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Jan 22 2011
STATUS
approved