|
| |
|
|
A078861
|
|
Least positive residues [mod 210] representing those residue classes which can be smaller prime of a difference 6 taken from A031924.
|
|
1
| |
|
|
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
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
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: A137669 A152470 A191023 * A106891 A191031 A106890
Adjacent sequences: A078858 A078859 A078860 * A078862 A078863 A078864
|
|
|
KEYWORD
| fini,full,nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Dec 13 2002
|
| |
|
|
