OFFSET
1,1
COMMENTS
Odd numbers k such that k^2+k+1 and k^2+k-1 are both prime. - Robert Israel, Feb 07 2026
EXAMPLE
With p=1, then q=2,a=3,b=4,c=5, and s=12-+1 (11, 13) both primes.
MAPLE
select(k -> isprime(k^2+k+1) and isprime(k^2+k-1), [seq(i, i=1..10000, 2)]); # Robert Israel, Feb 07 2026
MATHEMATICA
lst={}; Do[p=n; q=p+1; a=q^2-p^2; c=q^2+p^2; b=2*p*q; s=a+b+c; If[PrimeQ[s-1]&&PrimeQ[s+1], AppendTo[lst, a]], {n, 8!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jan 21 2009
EXTENSIONS
Name edited by Zak Seidov, Mar 21 2014
STATUS
approved