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”).

A227323
Prime(k) such that each of the three preceding and also each of the three following primes are twin primes.
0
11, 1039, 2099, 4253, 9433, 9437, 62983, 62987, 72229, 72251, 91121, 386401, 392269, 392279, 495589, 495611, 626617, 663583, 663587, 754973, 873553, 908857, 909301, 909317, 909319, 909329, 972137, 1006309, 1006331, 1138393, 1138409, 1159201
OFFSET
1,1
COMMENTS
The union of sequences A069456 and A227063.
Prime(k) such that prime(k-i), i=1..3, and prime(k+i), i=1..3 are in A001097.
MAPLE
istwp := proc(n)
if isprime(n) then
if isprime(n+2) or isprime(n-2) then
true;
else
false;
end if;
else
false;
end if;
end proc:
for i from 4 do
p := ithprime(i) ;
p1 := prevprime(p) ;
if istwp(p1) then
p2 := prevprime(p1) ;
if istwp(p2) then
p3 := prevprime(p2) ;
if istwp(p3) then
p1 := nextprime(p) ;
if istwp(p1) then
p2 := nextprime(p1) ;
if istwp(p2) then
p3 := nextprime(p2) ;
if istwp(p3) then
printf("%d\n", p) ;
end if;
end if;
end if;
end if;
end if;
end if;
end do: # R. J. Mathar, Jul 13 2013
CROSSREFS
Sequence in context: A046187 A234634 A004811 * A126197 A355546 A090814
KEYWORD
nonn
AUTHOR
Irina Gerasimova, Jul 06 2013
EXTENSIONS
Corrected by R. J. Mathar, Jul 13 2013
STATUS
approved