|
|
A212275
|
|
Least k such that 4*n*k+1 is a prime of the form m^2+1, or 0 if no such k exists.
|
|
1
|
|
|
1, 2, 3, 1, 5, 24, 7, 8, 1, 10, 99, 12, 13, 56, 135, 4, 425, 8, 4275, 5, 84, 352, 368, 6, 1, 234, 12, 28, 116, 120, 124, 2, 33, 306, 315, 4, 37, 3800, 156, 10, 6929, 42, 1075, 176, 45, 184, 47, 3, 1, 2, 204, 117, 1908, 6, 55, 14, 1425, 58, 236, 60, 10309, 62
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Conjecture: a(n)>0. If the conjecture is true, then there exist infinitely many primes of the form m^2+1.
|
|
LINKS
|
|
|
MAPLE
|
a:= proc(n) local k;
for k while not(isprime(4*n*k+1) and issqr (n*k)) do od; k
end:
|
|
PROG
|
(PARI) a(n)=my(N=4*n*core(n), k=0); while(!isprime(k++^2*N+1), ); k^2*N/(4*n) \\ Charles R Greathouse IV, May 14 2012
(Magma) S:=[]; for n in [1..62] do k:=1; while not IsPrime(4*n*k+1) or not IsSquare(n*k) do k:=k+1; end while; Append(~S, k); end for; S; // Bruno Berselli, May 15 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|