A239506 Numbers n such that n^10+10 and n^10-10 are prime.

4983, 105369, 113289, 150051, 191829, 208131, 277167, 305349, 363957, 400323, 494241, 541233, 577269, 656271, 668547, 995247, 1141503, 1218261, 1360623, 1494537, 1501863, 1528857, 1531959, 1534533, 1535919, 1621653, 1651551, 1864863, 1950597, 1969539, 2130513

Offset: 1

Author

Derek Orr, Mar 20 2014

Keywords

• nonn

Comments

All numbers are congruent to 33 mod 66.

Intersection of A239347 and A239418.

Examples

			4983^10+10 = 9438628041688305771192954743294050459 is prime and 4983^10-10 = 9438628041688305771192954743294050439 is prime. Thus, 4983 is a member of this sequence.
		

Crossrefs

Cf. A239347, A239418.

Programs

Mathematica

Select[Range[22*10^5],AllTrue[#^10+{10,-10},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 04 2018 *)

Python

import sympy
from sympy import isprime
def TwoBoth(x):
  for k in range(10**8):
    if isprime(k**x+x) and isprime(k**x-x):
      print(k)
TwoBoth(10)