A129865 List of pairs {n-th prime == 7 mod 18, n-th pair == -7 mod 18}.

7, 11, 43, 29, 61, 47, 79, 83, 97, 101, 151, 137, 223, 173, 241, 191, 277, 227, 313, 263, 331, 281, 349, 317, 367, 353, 421, 389, 439, 443, 457, 461, 547, 479, 601, 569, 619, 587, 673, 641, 691, 659, 709, 677, 727, 821, 853, 839, 907, 857, 997, 911, 1033, 929

Offset

1,1

Comments

Sum of pairs is multiple of 18k, with k=1,4,6,9,11,16,22,24,28,32,34,37,40,45,49,51,57,65,67,73,75,77,86,94,98,106.

Links

Table of n, a(n) for n=1..54.

Mathematica

pp=Prime[Range[1000]]; se7=Select[pp, Mod[ #, 18]==7&]; se11=Select[pp, Mod[ #, 18]==11&]; nn=Min[Length/@{se7, se11}]; tr=Table[{se7[[i]], se11[[i]]}, {i, nn}]; A1=tr//Flatten; k=(Total/@tr)/18

Crossrefs

Cf. A129807.

Sequence in context: A176955 A227281 A268579 * A153377 A062209 A086828

Adjacent sequences: A129862 A129863 A129864 * A129866 A129867 A129868

Keyword

nonn

Author

Zak Seidov, May 24 2007

Status

approved