OFFSET
1,1
EXAMPLE
a(1)=19, a(2)=29 because 3*19 - 2 = 2*29 - 3 = 55.
MAPLE
for i from 1 to 400 do p :=ithprime(i) ; q := (3*p+1)/2 ; if type(q, 'integer') then if isprime(q) then if not isprime(3*p-2) then printf("%d, %d, ", p, q) ; end if; end if; end if; end do: # R. J. Mathar, Mar 29 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Mar 03 2010
EXTENSIONS
Corrected and extended by R. J. Mathar, Mar 29 2010
STATUS
approved