OFFSET
1,1
COMMENTS
a(n)^2 + n^2 = A068487(n).
From Robert Israel, Dec 11 2024: (Start)
a(n) is the least k > n such that k^2 + n^2 is prime.
a(n) = n + 1 for n in A027861. (End)
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Pythagorean Triple
Eric Weisstein's World of Mathematics, Right Triangle
MAPLE
f:= proc(n) local k;
for k from n+1 by 2 do
if isprime(k^2 + n^2) then return k fi
od
end proc:
map(f, [$1..100]); # Robert Israel, Dec 11 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Nov 04 2003
STATUS
approved