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,1

Links

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

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.

Mathematica

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

Crossrefs

Cf. A031924, A008364, A078859, A078860.

Sequence in context: A360979 A152470 A191023 * A106891 A191031 A106890

Adjacent sequences: A078858 A078859 A078860 * A078862 A078863 A078864

Keyword

fini,full,nonn

Author

Labos Elemer, Dec 13 2002

Status

approved