A239347 - OEIS

%I #11 Nov 13 2021 12:48:12

%S 1,539,583,1023,1903,2277,2893,3047,4433,4587,4983,5181,6567,7271,

%T 7359,10857,10989,11341,12221,12507,13167,13277,13453,13739,14443,

%U 14729,17347,17919,17941,18381,19151,19437,19481,21131,21197,21307,22561,23331,24871,25003,25289,27643,28391,29161,29469,31339,33077,35057,36597

%N Numbers n such that n^10+10 is prime.

%C Note that all numbers in this sequence are odd.

%e 1^10+10 = 11 is prime. Thus, 1 is a member of this sequence.

%t Select[Range[1,40001,2],PrimeQ[#^10+10]&] (* _Harvey P. Dale_, Nov 13 2021 *)

%o (Python)

%o import sympy

%o from sympy import isprime

%o {print(n) for n in range(10**5) if isprime(n**10+10)}

%o (PARI) is(n)=isprime(n^10+10) \\ _Charles R Greathouse IV_, Jun 06 2017

%Y Cf. A067201, A049441.

%K nonn,easy

%O 1,2

%A _Derek Orr_, Mar 16 2014