A129811 Lesser of consecutive prime pairs whose last digits differ by 4.

13, 43, 47, 103, 113, 157, 163, 167, 193, 223, 257, 293, 313, 367, 463, 557, 587, 607, 613, 643, 647, 673, 677, 727, 773, 823, 853, 863, 883, 947, 953, 977, 1093, 1097, 1117, 1187, 1213, 1217, 1303, 1367, 1423, 1483, 1583, 1657, 1663, 1693, 1747, 1777, 1783

Offset

2,1

Comments

Conjecture: The number of terms in this sequence is infinite.

Links

Table of n, a(n) for n=2..50.

Example

The last digits of the consecutive prime pair 13 and 17 differ by 4 so 13 is in the table.

Mathematica

Select[Prime[Range[277]], Abs[Mod[#, 10]-Mod[NextPrime[#], 10]]==4&] (* James C. McMahon, Feb 02 2025 *)

Prog

(PARI) \d can be 2, 4, 6, 8 primediffd(n, d) = { forprime(x=3, n, y=abs((nextprime(x+1)%10-x%10)); if(y==d, print1(x", ") ) ) }

Crossrefs

Sequence in context: A118857 A118529 A340480 * A108545 A136191 A268483

Adjacent sequences: A129808 A129809 A129810 * A129812 A129813 A129814

Keyword

easy,nonn,base,less,changed

Author

Cino Hilliard, May 19 2007

Status

approved