No further terms between 10 and 5000. - R. J. Mathar, Feb 07 2010
No further terms to 100000. Expected number of remaining terms: (zeta(2) - 1 - 1/4 - ... - 1/100000^2)/log^2 2 ~= 0.00002. - Charles R Greathouse IV, Mar 25 2010
a(1)=1 because 2^1+3^2=11 and 2^1+3^3=29 are prime.
MATHEMATICA
Select[Range[10], AllTrue[2^#+{9, 27}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, May 28 2016 *)
