login
Numbers k such that (30*k)^4 + 1 is prime.
1

%I #20 Mar 07 2021 18:50:15

%S 3,6,7,18,20,23,27,31,39,40,55,56,57,68,75,80,88,90,101,103,113,115,

%T 116,124,126,129,132,136,139,148,153,163,165,173,194,203,211,215,218,

%U 232,260,277,284,285,288,290,293,302,309,336,344,347,357,358,362,368,377,390,394,397,401

%N Numbers k such that (30*k)^4 + 1 is prime.

%C This is the third sequence in a family defined by this same condition, when generalized as (30*k)^(2^m).

%C A111175 and A138220 are the first and second sequences in this family, with m = 0 and m = 1, respectively.

%t (* This program gives some results for each member of the family for m up to 10. *)

%t Do[resultk = {};

%t Do[

%t r = (30 k)^(2^m) + 1;

%t If[PrimeQ[r], AppendTo[resultk, k]];

%t , {k, 1, 1000}];

%t If[Length[resultk] > 0, Print[{m, 2^m, resultk}]], {m, 0, 10}]

%o (PARI) isok(k) = isprime((30*k)^4 + 1); \\ _Michel Marcus_, Feb 13 2021

%Y Cf. A111175, A138220.

%K nonn

%O 1,1

%A _Richard R. Forberg_, Feb 06 2021