login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A261542
Integers k such that k^2 + 1 = 2*p where p and p+2 are twin primes.
1
3, 9, 51, 69, 231, 279, 309, 471, 519, 579, 639, 699, 819, 861, 909, 1029, 1311, 1419, 1629, 1701, 1749, 1899, 2151, 2541, 2619, 2799, 3201, 3291, 3429, 3501, 3981, 4089, 4719, 4809, 4941, 5061, 5301, 5571, 5679, 5739, 5859, 6369, 6621, 6789, 6939, 7071, 7149
OFFSET
1,1
COMMENTS
The corresponding primes p are 5, 41, 1301, 2381, 26681, 38921, 47741, 110921, 134681, ... and are in A001359 (lesser of twin primes).
Property of the sequence: the primes p > 5 are congruent to 41 mod 180 => a(n)^2 == 9, 81 mod 180 for n>1.
LINKS
EXAMPLE
3 is in the sequence because 3^2 + 1 = 2*5 and 2 + 5 = 7 is prime.
MAPLE
with(numtheory):
for n from 1 by 2 to 8000 do:
p:=n^2+1:
if isprime(p/2) and isprime(p/2+2)
then
printf(`%d, `, n):
else
fi:
od:
MATHEMATICA
Select[Range[7500], AllTrue[(#^2+1)/2+{0, 2}, PrimeQ]&] (* Harvey P. Dale, Apr 09 2023 *)
CROSSREFS
Sequence in context: A036751 A260156 A058110 * A079836 A171951 A323232
KEYWORD
nonn
AUTHOR
Michel Lagneau, Aug 24 2015
STATUS
approved