A249676 Terms k of A249667 such that k-A151799(k) = A151800(k)-k.

6, 30, 50, 144, 300, 560, 610, 650, 660, 714, 780, 810, 816, 870, 1120, 1176, 1190, 1806, 2130, 2470, 2490, 2550, 2922, 3030, 3240, 3330, 3390, 3480, 3600, 3620, 3840, 4266, 4368, 5796, 5850, 6270, 6786, 6954, 7074, 7710, 8280, 9400, 9990, 10146, 10350, 10380, 10530, 10660, 11064

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Example

610 is in A249667: the least prime>610 is 613, and 610+613=1223 is prime; the largest prime<610 is 607, and 610+607=1217 is prime. Also, 613-610=610-607=3, then 610 is in the current sequence.

Maple

P:= select(isprime, [seq(i, i=3..12000, 2)]):
A:= (P[1..-2] + P[2..-1])/2:
A[select(i -> isprime(A[i]+P[i]) and isprime(A[i]+P[i+1]), [$1..nops(A)])]; # Robert Israel, Oct 03 2025

Prog

(PARI) {for(i=3, 2*10^4, m=nextprime(i+1); k=i+m; n=precprime(i-1); q=i+n; if(isprime(k)&&isprime(q)&&m-i==i-n, print1(i, ", ")))}

Crossrefs

Intersection of A024675 and A249667.

Cf. A249624, A249666.

Sequence in context: A389150 A276933 A110175 * A383636 A259752 A014203

Adjacent sequences: A249673 A249674 A249675 * A249677 A249678 A249679

Keyword

nonn

Author

Antonio Roldán, Dec 03 2014

Status

approved