login
A078864
Smallest primes from A001359, each belonging to those different residue class of mod 210 which are listed in A078859. Arranged according to possible least positive residues mod 210.
3
3, 5, 11, 17, 29, 41, 59, 71, 101, 107, 137, 149, 179, 191, 197, 419, 1427
OFFSET
1,1
EXAMPLE
Several terms are equal to corresponding ones in A078859, while others are larger like: 1427=210.6+167 where r=167 is in A078859.
MATHEMATICA
f[x_] := Mod[Prime[x], 210] d[x_] := Prime[x+1]-Prime[x] t=Table[0, {210}]; Do[s=f[n]; If[Equal[d[n], 2]&&s<211&&t[[s]]==0, t[[s]]=Prime[n]], {n, 1, 10000}]; t
CROSSREFS
KEYWORD
fini,full,nonn
AUTHOR
Labos Elemer, Dec 13 2002
STATUS
approved