OFFSET
1,1
COMMENTS
Companion sequence to A085554 (which yields the greater of the pair) and A086381 (which lists the x-values). Except for the first term, all values are a(n)=11 (mod 72). - M. F. Hasler, Jan 18 2015
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
MATHEMATICA
Transpose[Select[Table[x^2+{2, 4}, {x, 5000}], AllTrue[#, PrimeQ]&]][[1]] (* The program uses the AllTrue function from Mathematica version 10 *)
PROG
(PARI) forstep(x=1, 9999, 2, is_A086381(x)&&print1(x^2+2, ", ")) \\ M. F. Hasler, Jan 16 2015
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
M. F. Hasler, Jan 16 2015
STATUS
approved