A078861 Least positive residues [mod 210] representing those residue classes which can be smaller prime of a difference 6 taken from A031924.

11, 13, 17, 23, 31, 37, 41, 47, 53, 61, 67, 73, 83, 97, 101, 103, 107, 121, 131, 137, 143, 151, 157, 163, 167, 173, 181, 187, 191, 193

Offset: 1

Author

Labos Elemer, Dec 13 2002

Keywords

• fini
• full
• nonn

Crossrefs

Cf. A031924, A008364, A078859, A078860.

Programs

Mathematica

t=Flatten[Position[Table[GCD[w, 210], {w, 1, 210}], 1]] t2=Intersection[t, t+6]-6

Formula

Intersection[RRS(210), 6+RRS{210)]-6. RRS[210]=reduced residue system of 210=first 48=phi[210] terms of A008364; 210k+r generates complete A031924 with suitable k and r taken from these 30 numbers.